Sign Up
Log In
Log In
or
Sign Up
Places
All Projects
Status Monitor
Collapse sidebar
home:Tomcat42
perl-B-Generate
perl-B-Generate.spec
Overview
Repositories
Revisions
Requests
Users
Attributes
Meta
File perl-B-Generate.spec of Package perl-B-Generate
# # spec file for package perl-B-Generate # # Copyright (c) 2017 SUSE LINUX GmbH, Nuernberg, Germany. # # All modifications and additions to the file contributed by third parties # remain the property of their copyright owners, unless otherwise agreed # upon. The license for this file, and modifications and additions to the # file, is the same license as for the pristine package itself (unless the # license for the pristine package is not an Open Source License, in which # case the license is the MIT License). An "Open Source License" is a # license that conforms to the Open Source Definition (Version 1.9) # published by the Open Source Initiative. # Please submit bugfixes or comments via http://bugs.opensuse.org/ # Name: perl-B-Generate Version: 1.56 Release: 0 #Upstream: This module is available under the same licences as perl, the Artistic license and the GPL. %define cpan_name B-Generate Summary: Create your own op trees License: Artistic-1.0 or GPL-1.0+ Group: Development/Libraries/Perl Url: http://search.cpan.org/dist/B-Generate/ Source0: https://cpan.metacpan.org/authors/id/R/RU/RURBAN/%{cpan_name}-%{version}.tar.gz Source1: cpanspec.yml BuildRoot: %{_tmppath}/%{name}-%{version}-build BuildRequires: perl BuildRequires: perl-macros BuildRequires: perl(ExtUtils::CBuilder) Requires: perl(ExtUtils::CBuilder) %{perl_requires} %description The 'B' module allows you to examine the Perl op tree at runtime, in Perl space; it's the basis of the Perl compiler. But what it doesn't let you do is manipulate that op tree: it won't let you create new ops, or modify old ones. Now you can. Well, if you're intimately familiar with Perl's internals, you can. 'B::Generate' turns 'B''s accessor methods into get-set methods. Hence, instead of merely saying $op2 = $op->next; you can now say $op->next($op2); to set the next op in the chain. It also adds constructor methods to create new ops. This is where it gets really hairy. new B::OP ( type, flags ) new B::UNOP ( type, flags, first ) new B::BINOP ( type, flags, first, last ) new B::LOGOP ( type, flags, first, other ) new B::LISTOP ( type, flags, first, last ) new B::SVOP ( type, flags, sv ) new B::COP ( flags, name, first ) In all of the above constructors, 'type' is either a numeric value representing the op type ('62' is the addition operator in certain perl versions, for instance) or the name of the op. ('"add"') Incidentally, if you know about custom ops and have registed them properly with the interpreter, you can create custom ops by name: 'new B::OP("mycustomop",0)', or whatever. 'first', 'last' and 'other' are ops to be attached to the current op; these should be 'B::OP' objects. If you haven't created the ops yet, don't worry; give a false value, and fill them in later: $x = new B::UNOP("negate", 0, undef); # ... create some more ops ... $x->first($y); In addition, one may create a new 'nextstate' operator with newstate B::op ( flags, label, op) in the same manner as 'B::COP::new' - this will also, however, add the 'lineseq' op. Finally, you can set the main root and the starting op by passing ops to the 'B::main_root' and 'B::main_start' functions. This module can obviously be used for all sorts of fun and optimizational purposes. One example will be in conjuction with source filters; have your source filter parse an input file in a foreign language, create an op tree for it and get Perl to execute it. Then email me and tell me how you did it. And why. %prep %setup -q -n %{cpan_name}-%{version} %build %{__perl} Makefile.PL INSTALLDIRS=vendor OPTIMIZE="%{optflags}" %{__make} %{?_smp_mflags} %check %{__make} test %install %perl_make_install %perl_process_packlist %perl_gen_filelist %files -f %{name}.files %defattr(-,root,root,755) %doc Changes README %license Artistic Copying %changelog
Locations
Projects
Search
Status Monitor
Help
OpenBuildService.org
Documentation
API Documentation
Code of Conduct
Contact
Support
@OBShq
Terms
openSUSE Build Service is sponsored by
The Open Build Service is an
openSUSE project
.
Sign Up
Log In
Places
Places
All Projects
Status Monitor