Subroutine

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....

Class::Contract - Design-by-Contract OO in Perl. SYNOPSIS package ClassName use Class::Contract; contract { inherits BaseClass; invar { ... }; attr data1; attr data2 => HASH; class attr shared => SCALAR; ctor new; method methodname; pre { ... }; failmsg Error message; post...

Perl6::Export::Attrs - the Perl 6 is export(...) trait as a Perl 5 attribute. SYNOPSIS package Some::Module; use Perl6::Export::Attrs; # Export &foo by default, when explicitly requested, # or when the :ALL export set is requested... sub foo :Export(:DEFAULT) { print "phooo!"; } #...


Platforms: *nix

Contextual::Return is a Perl module to create context-senstive return values. SYNOPSIS use Contextual::Return; use Carp; sub foo { return SCALAR { thirty-twelve } BOOL { 1 } NUM { 7*6 } STR { forty-two } LIST { 1,2,3 } HASHREF { {name => foo, value => 99} } ARRAYREF { [3,2,1] }...


Platforms: *nix

IO::Interactive is a Perl module with utilities for interactive I/O. SYNOPSIS use IO::Interactive qw(is_interactive interactive busy); if ( is_interactive() ) { print "Running interactivelyn"; } # or... print {interactive} "Running interactivelyn"; $fh = busy {...


Platforms: *nix

IO::Busy is a Perl module to intercept terminal input while something else is happening. SYNOPSIS use IO::Busy; my $fh = busy { non_interactive_stuff(); }; This module exports a single subroutine, named busy. That subroutine takes a single argument, which must be a block of code. busy...


Platforms: *nix

IO::InSitu is a Perl module to avoid clobbering files opened for both input and output. SYNOPSIS use IO::InSitu; my ($in, $out) = open_rw($infile_name, $outfile_name); for my $line (<$in>) { $line =~ s/foo/bar/g; print {$out} $line; } When users want to do in-situ processing on a...


Platforms: *nix

Exception::Class is a Perl module that allows you to declare real exception classes in Perl. SYNOPSIS use Exception::Class ( MyException, AnotherException => { isa => MyException }, YetAnotherException => { isa => AnotherException, description => These exceptions are related to IPC },...


Platforms: *nix

Simulation::Sensitivity is a general-purpose sensitivity analysis tool for user-supplied calculations and parameters. SYNOPSIS use Simulation::Sensitivity; $sim = Simulation::Sensitiviy->new( calculation => sub { my $p = shift; return $p->{alpha} + $p->{beta} } parameters => { alpha =>...


Platforms: *nix

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,...


Platforms: *nix

Devel::DProf is a Perl code profiler. SYNOPSIS perl5 -d:DProf test.pl The Devel::DProf 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 information can be used to determine which subroutines are using...


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

Async::Group is a Perl class to deal with simultaneous asynchronous calls. SYNOPSIS use Async::Group ; use strict ; sub sub1 { print "Dummy subroutine n"; my $dummy = shift ; my $cb = shift ; &$cb(1); } sub allDone { print "All done, result is ", shift ,"n" ; } my $a =...


Platforms: *nix

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

CAD::Drawing::IO::Tk is a Perl module with GUI I/O methods for CAD::Drawing. This module is considered extremely pre-ALPHA and its use is probably deprecated by the time you read this. Methods There is no constructor for this class, its methods are inherited via CAD::Drawing::IO Thoughts...


Platforms: *nix

MIME::WordDecoder is a Perl module to decode RFC-1522 encoded words to a local representation. SYNOPSIS See MIME::Words for the basics of encoded words. See "DESCRIPTION" for how this class works. use MIME::WordDecoder; ### Get the default word-decoder (used by unmime()): $wd = default...


Platforms: *nix

File::Find is a Perl module to traverse a directory tree. SYNOPSIS use File::Find; find(&wanted, @directories_to_search); sub wanted { ... } use File::Find; finddepth(&wanted, @directories_to_search); sub wanted { ... } use File::Find; find({ wanted => &process, follow => 1 }, .);...


Platforms: *nix

Set::Infinite::Basic is a Perl module with sets of intervals. SYNOPSIS use Set::Infinite::Basic; $set = Set::Infinite::Basic->new(1,2); # [1..2] print $set->union(5,6); # [1..2],[5..6] Set::Infinite::Basic is a Set Theory module for infinite sets. It works on reals, integers, and...


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

Include is a Perl module that allow you to use #defines from C header files. SYNOPSIS use Include qw(-I /some/path/of/mine); use Include q< sys/types.h >; use Include q< sys/types.h > "/[A-Z]/"; The Include module implements a method of using #define constants from C header files. It does...


Platforms: *nix