Subroutine

Filter::Macro is a Perl module to make macro modules that are expanded inline. SYNOPSIS In MyHandyModules.pm: package MyHandyModules; use Filter::Macro; # lines below will be expanded into callers code use strict; use warnings; use Switch; use IO::All; use Quantum::Superpositions;...

Devel::RingBuffer is a Perl module with shared memory ring buffers for Perl scripts diagnosis/debug. SYNOPSIS # # create ringbuffer # use Devel::RingBuffer; use Devel::RingBuffer::TieInt; my $ringbuf = Devel::RingBuffer->new( File => somefile.trace, Rings => 20, Slots => 20,...

Text::WagnerFischer is an implementation of the Wagner-Fischer edit distance. SYNOPSIS use Text::WagnerFischer qw(distance); print distance("foo","four");# prints "2" print distance([0,1,2],"foo","four");# prints "3" my @words=("four","foo","bar"); my...


Platforms: *nix

File::PM2File - obsolete. User File::Where SYNOPSIS file_in_include() # obsolete. Replace with File::Where::where() pm2file() # obsolete. Replace with File::Where::where_pm() pm2require() # obsolete. Replace with File::Where::pm2require() $File::PM2File::warn_obsolete = 1; # turns on...


Platforms: *nix

File::Maker is a Perl module that mimics a make by loading a database and calling targets methods. SYNOPSIS ##### # Subroutine interface # use File::Maker qw(load_db); %data = load_db($pm); ###### # Object interface # require File::Maker; $maker = $maker->load_db($pm);...


Platforms: *nix

File::DirCompare is a Perl module to compare two directories using callbacks. SYNOPSIS use File::DirCompare; # Simple diff -r --brief replacement use File::Basename; File::DirCompare->compare($dir1, $dir2, sub { my ($a, $b) = @_; if (! $b) { printf "Only in %s: %sn", dirname($a),...


Platforms: *nix

Class::Observable is a Perl module that allows other classes and objects to respond to events in yours. SYNOPSIS # Define an observable class package My::Object; use base qw( Class::Observable ); # Tell all classes/objects observing this object that a state-change # has occurred sub...


Platforms: *nix

AppleII::Disk is a Perl module for block-level access to Apple II disk image files. SYNOPSIS use AppleII::Disk; my $disk = AppleII::Disk->new(image.dsk); my $data = $disk->read_block(1); # Read block 1 $disk->write_block(1, $data); # And write it back :-) AppleII::Disk provides...


Platforms: *nix

Text::Reform is a Perl module for manual text wrapping and reformatting. SYNOPSIS use Text::Reform; print form $template, $data, $to, $fill, $it, $with; use Text::Reform qw( tag ); print tag B, $enboldened_text; The form sub The form() subroutine may be exported from the module....


Platforms: *nix

Benchmark is a Perl module with benchmark running times of Perl code. SYNOPSIS use Benchmark qw(:all) ; timethis ($count, "code"); # Use Perl code in strings... timethese($count, { Name1 => ...code1..., Name2 => ...code2..., }); # ... or use subroutine references. timethese($count,...


Platforms: *nix

Ace::Browser::AceSubs Perl module contains subroutines for AceBrowser. SYNOPSIS use Ace; use Ace::Browser::AceSubs; use CGI qw(:standard); use CGI::Cookie; my $obj = GetAceObject() || AceNotFound(); PrintTop($obj); print $obj->asHTML; PrintBottom(); Ace::Browser::AceSubs exports a...


Platforms: *nix

Javascript::Menu is a NumberedTree that generates HTML and Javascript code for a menu. SYNOPSIS use Javascript::Menu; # Give it something to do (example changes the menus caption): my $action = sub { my $self = shift; my ($level, $unique) = @_; my $value = $self->getValue; return...


Platforms: *nix

Sub::Regex is a Perl module to create synonymous subroutines. SYNOPSIS use Sub::Regex; sub /look(s|ing)?_for/ ($){ foobar blah blah } look_for(Amanda); looks_for(Amanda); looking_for(Amanda); lOoKiNg_fOr(Amanda); Sub::Regex is a small tool for users to create a subroutine with...


Platforms: *nix

IO::Pipe::Producer is a Perl module that provides two modules getSubroutineProducer and getSystemProducer. SYNOPSIS # Module which provides 2 methods: getSubroutineProducer # and getSystemProducer. They take a subroutine reference # (with associated arguments) and a system call #...


Platforms: *nix

SYNOPSIS ###### # Subroutine interface # use Data::Startup qw(config override); $options = override(%default_options, @option_list ); $options = override(%default_options, @option_list ); $options = override(%default_options, %option_list ); @options_list = config(%options ); ($key,...


Platforms: *nix

B::Lint module contains Perl lint. SYNOPSIS perl -MO=Lint[,OPTIONS] foo.pl The B::Lint module is equivalent to an extended version of the -w option of perl. It is named after the program lint which carries out a similar process for C programs. OPTIONS AND LINT CHECKS Option words are...


Platforms: *nix

Data::Secs2 is a Perl module to pack, unpack, format, transform from Perl data SEMI E5-94 nested data. SYNOPSIS ##### # Subroutine interface # use Data::Secs2 qw(arrayify config listify neuterify numberify perlify perl_typify secsify secs_elementify stringify textify transify); @array =...


Platforms: *nix

Time::Skew is a Perl module that computes local clock skew with respect to a remote clock. SYNOPISI use Time::Skew # Init Convex Hull and timing data my $hull=[]; my $result={}; # Iterate data point introduction Time::Skew::convexhull($result,$datapoint,$hull); This module supports...


Platforms: *nix

List::MRU is a Perl module that implements a simple fixed-size MRU-ordered list. SYNOPSIS use List::MRU; # Constructor $lm = List::MRU->new(max => 20); # Constructor with explicit eq subroutine for obj equality tests $lm = List::MRU->new(max => 20, eq => sub { $_[0]->stringify eq...


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