Sample Perl Code

StateML is a State Machine Markup Language, with GraphViz and template-driven code generation. SYNOPSIS ## See the stml command for command line use (recommended) ## Heres what a .stml file might look like: < machine id="main" xmlns="http://slaysys.com/StateML/1.0"...

Mozilla::ConsoleService is a Perl interface to Mozilla nsIConsoleService. SYNOPSIS use Mozilla::ConsoleService; Mozilla::PromptService::Register(sub { print $_[0]; }); Mozilla::ConsoleService uses Mozilla nsIConsoleService to pass log messages to perl code, similar to JavaScript Console...

SVG::SVG2zinc is a Perl module to display or convert svg files in scripts, classes, images... SYNOPSIS use SVG::SVG2zinc; &SVG::SVG2zinc::parsefile(file.svg, Backend,file.svg, -out => outfile, -verbose => $verbose, -namespace => 0|1, -prefix => string, ); # to generate a Perl script:...


Platforms: *nix

Path::Graph is a Perl module created to generate paths from hash graph. SYNOPSIS Code 1 #!usr/bin/perl my %graph = ( A => {B=>1,C=>4}, B => {A=>1,C=>2}, C => {A=>4,B=>2} ); use Paths::Graph; my $g = Paths::Graph->new(-origin=>"A",-destiny=>"C",-graph=>%graph); my @paths =...


Platforms: *nix

sqlpp Perl package is a SQL preprocessor. sqlpp is a conventional cpp-alike preprocessor taught to understand SQL ( PgSQL, in particular) syntax specificities. In addition to the standard #define/#ifdef/#else/#endif cohort, provides also #perldef for calling arbitrary perl code. SYNOPSIS...


Platforms: *nix

HTML::Embperl is a Perl module for building dynamic Websites with Perl. SYNOPSIS Embperl is a Perl extension module which gives you the power to embed Perl code directly in your HTML documents (like server-side includes for shell commands). If building more than a single page, you may also...


Platforms: *nix

Games::PerlWar is a Perl variant of the classic Corewar game. This is a sparring program, similar to the programmed reality of the Matrix. It has the same basic rules, rules like gravity. What you must learn is that these rules are no different than the rules of a computer system. Some of...


Platforms: *nix

Net::TCPwrappers is a Perl interface to tcp_wrappers. SYNOPSIS use Net::TCPwrappers qw(RQ_DAEMON RQ_FILE request_init fromhost hosts_access); ... my $progname = yadd; while (accept(CLIENT, SERVER)) { my $req = request_init(RQ_DAEMON, $progname, RQ_FILE, fileno(CLIENT)); fromhost($req);...


Platforms: *nix

VCS project is a Perl library for generic Version Control System access in Perl. SYNOPSIS use VCS; $file = VCS::File->new($ARGV[0]); print $file->url, ":n"; for $version ($file->versions) { print $version->version, was checked in by , $version->author, "n"; } VCS is an API for...


Platforms: *nix

List::Compare is a Perl module to compare elements of two or more lists. SYNOPSIS The bare essentials: @Llist = qw(abel abel baker camera delta edward fargo golfer); @Rlist = qw(baker camera delta delta edward fargo golfer hilton); $lc = List::Compare->new(@Llist, @Rlist);...


Platforms: *nix

TeX::Hyphen is a Perl module to hyphenate words using TeXs patterns. SYNOPSIS use TeX::Hyphen; my $hyp = new TeX::Hyphen file => hyphen.tex, style => czech, leftmin => 2, rightmin => 2; # my $hyp = new TeX::Hyphen "hyphen.tex"; my $word = "representation"; my @points =...


Platforms: *nix

Petal is a Perl Template Attribute Language - TAL for Perl! SYNOPSIS in your Perl code: use Petal; my $template = new Petal (foo.xhtml); print $template->process (bar => BAZ); in foo.xhtml < html xmlns:tal="http://purl.org/petal/1.0/" > < body tal:content="bar" >Dummy Content< /body...


Platforms: *nix

Devel::Profile is a Perl module to tell me why my perl program runs so slowly. SYNOPSIS perl -d:Profile program.pl less prof.out The Devel::Profile package is a Perl code profiler. This will collect information on the execution time of a Perl script and of the subs in that script. This...


Platforms: *nix

PDL::Fit::Levmar is a Perl module with Levenberg-Marquardt fit/optimization routines. Levenberg-Marquardt routines for least-squares fit to functions non-linear in fit parameters. This module provides a PDL ( PDL::PDL ) interface to the non-linear fitting library levmar (written in C). Levmar...


Platforms: *nix

Emacs::Lisp provides support for writing Emacs extensions in Perl. Emacs allows you to customize your environment using Lisp. With EPL, you can use Perl, too. This module allows Perl code to call functions and access variables of Lisp. You still need to learn some Lisp in order to understand...


Platforms: *nix

Crypt::SSLeay is a Perl module for OpenSSL glue that provides LWP https support. SYNOPSIS lwp-request https://www.nodeworks.com use LWP::UserAgent; my $ua = new LWP::UserAgent; my $req = new HTTP::Request(GET, https://www.nodeworks.com); my $res = $ua->request($req); print...


Platforms: *nix

ExtUtils::F77 is a simple Perl interface to F77 libs. This module tries to figure out how to link C programs with Fortran subroutines on your system. Basically one must add a list of Fortran runtime libraries. The problem is their location and name varies with each OS/compiler combination!...


Platforms: *nix

XML::PatAct::ToObjects is an action module for creating Perl objects. SYNOPSIS use XML::PatAct::ToObjects; my $patterns = [ PATTERN => [ OPTIONS ], PATTERN => "PERL-CODE", ... ]; my $matcher = XML::PatAct::ToObjects->new( Patterns => $patterns, Matcher => $matcher, CopyId => 1,...


Platforms: *nix

ummf Perl module contains a driver for UMMF. SYNOPSIS ummf [-I dir] [-M MetaModel] [-m Main::Module] [-o {dir|-}] [-e exporter] input ... This is a driver for the UMMF toolkit. It translates UML input documents into the export targets specified by the -e option. If -o - is specified the...


Platforms: *nix

Math::Symbolic is a Perl module for symbolic calculations. SYNOPSIS use Math::Symbolic; my $tree = Math::Symbolic->parse_from_string(1/2 * m * v^2); # Now do symbolic calculations with $tree. # ... like deriving it... my ($sub) = Math::Symbolic::Compiler->compile_to_sub($tree); my...


Platforms: *nix