Subroutine

RPM::Make is a Perl module to cleanly generate an RPM. SYNOPSIS use RPM::Make; # The "Manifest": list of files that will comprise the software package. my @filelist=(tmproot/file1.txt, tmproot/file2.txt, tmproot/file3.txt, tmproot/file4.txt); my %doc; my %conf; my %confnoreplace; my...

File::SmartNL is a slurp text files no matter the New Line (NL) sequence. SYNOPSIS ##### # Subroutine Interface # use File::SmartNL qw(config fin fout smartnl); $old_value = config( $option ); $old_value = config( $option => $new_value); (@all_options) = config( ); $data =...

perltoot is Toms object-oriented tutorial for perl. Object-oriented programming is a big seller these days. Some managers would rather have objects than sliced bread. Why is that? Whats so special about an object? Just what is an object anyway? An object is nothing but a way of tucking away...


Platforms: *nix

C/Invoke is a library for connecting to C libraries at runtime. This differs from the typical method of interfacing with C, which involves writing static definitions which are then compiled to a machine-dependant format. C/Invoke provides a runtime facility to build descriptions of C functions...


Platforms: *nix

Test::Resub is a lexically scoped subroutine replacement for testing. SYNOPSIS #!/usr/bin/perl use Test::More tests => 4; use Test::Resub qw(resub); { package Somewhere; sub show { my ($class, $message) = @_; return "$class, $message"; } } # sanity is( Somewhere->show(beyond the...


Platforms: *nix

ReleaseAction - call actions upon release. SYNOPSIS use ReleaseAction on_release; { # OO style my $handle = ReleaseAction->new( sub {print "Exiting scopen"} ); print "In scopen"; } { # Functional style my $handle = on_release {print "Exiting scopen"}; print "In scopen"; } { my...


Platforms: *nix

Inline::C is a Perl module that can Write Perl Subroutines in C. Inline::C is a module that allows you to write Perl subroutines in C. Since version 0.30 the Inline module supports multiple programming languages and each language has its own support module. This document describes how to use...


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

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

Sub::Curry is a Perl module to create curried subroutines. SYNOPSIS use Sub::Curry; use Sub::Curry qw/ :CONST curry /; # Import spice constants # and the &curry function. #my $f1 = Sub::Curry::->new(&foo, 1, 2); # Same as below. my $f1 = curry(&foo, 1, 2); my $f2 = $cb1->new(3, 4); my...


Platforms: *nix

Pod::Template is a Perl module for building pod documentation from templates. SYNOPSIS ### As a module ### use Pod::Template; my $parser = new Pod::Template; $parser->parse( template => documentation.ptmpl ); print $parser->as_string ### As a script ### $ podtmpl -I dir1 -I dir2...


Platforms: *nix

Params::Profile is a Perl module for registering Parameter profiles. SYNOPSIS package Foo::Bar; use Params::Profile; ### Single profile Params::Profile->register_profile( method => subroto, profile => { testkey1 => { required => 1 }, testkey2 => { required => 1, allow => qr/^d+$/,...


Platforms: *nix

File::AnySpec is a Perl module to perform operations on foreign (remote) file names. SYNOPSIS # Subroutine Interface # use File::AnySpec qw(fspec2fspec pm2fspec os2fspec fspec2os fspec_glob fspec2pm); $file = fspec2fspec($from_fspec, $to_fspec $fspec_file, [$nofile]) $os_file =...


Platforms: *nix

Tie::Eudora is a Perl module that can encode/decode emails, read/write emails in Eudora mailbox files. SYNOPSIS #### # Subroutine interface # $encoded_email = decode_record($mailbox_email); @email = decode_field($encoded_email); $encoded_email = encode_field (@email); $mailbox_email =...


Platforms: *nix

Sub::DeferredPartial is a deferred evaluation / partial application. SYNOPSIS use Sub::DeferredPartial def; $S = def sub : P1 P2 P3 { %_=@_; join , @_{qw(P1 P2 P3)} }; print $S->( P1 => 1, P2 => 2, P3 => 3 )->(); # 123 $A = $S->( P3 => 1 ); # partial application $B = $S->( P3 => 2 );...


Platforms: *nix

Sub::PatMat can call a version of subroutine depending on its arguments. SYNOPSIS use Sub::PatMat; # basics: sub fact : when($_[0] <= 1) { 1 } sub fact { my ($n) = @_; $n*fact($n-1) } print fact(6); # referring to things other than @_: sub mysort : when($a < $b) { -1 } sub mysort :...


Platforms: *nix

Tree::BPTree is a Perl implementation of B+ trees. SYNOPSIS use Tree::BPTree; # These arguments are actually the defaults my $tree = new Tree::BPTree( -n => 3, -unique => 0, -keycmp => sub { $_[0] cmp $_[1] }, -valuecmp => sub { $_[0] <=> $_[1] }, ); # index the entries in this...


Platforms: *nix

B::LintSubs is a Perl compiler backend to check sub linkage. SYNOPSIS perl -MO=LintSubs [FILE] [-e PROGRAM] When using use strict, subroutine names are not checked at the callsite; this makes the following a perfectly valid program at compiletime, that only blows up at runtime use strict;...


Platforms: *nix

Tie::Form is a Perl module to access a machine readable database file that minics a hardcopy form. SYNOPSIS require Tie::Form; ##### # Using support methods and file handle with # the file subroutines such as open(), readline() # print(), close() # tie *FORM_FILEHANDLE, Tie::Form,...


Platforms: *nix

Tie::FormA is a Perl module that can access a machine readable database file that minics a hardcopy form. SYNOPSIS require Tie::FormA; ##### # Using support methods and file handle with # the file subroutines such as open(), readline() # print(), close() # tie *FORM_FILEHANDLE,...


Platforms: *nix