Perl Subroutine

Tk::PerlMethodList is a Perl module to query the Symbol-table for methods (subroutines) defined in a class (package) and its parents. SYNOPSIS require Tk::PerlMethodList; my $instance = $main_window->PerlMethodList(); Tk::PerlMethodList is a Tk::Toplevel-derived widget. The window...

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

B::XPath class can search Perl optrees with XPath syntax. SYNOPSIS Perl represents programs internally as a tree of opcodes. To execute a program, it walks this tree, performing each operation as it encounters it. The B family of modules allows you to examine (and in some cases, manipulate)...


Platforms: *nix

Lingua::ZH::Currency::UpperCase is a Perl module to convert Currency Numbers to Chinese UpperCase Format. SYNOPSIS use Lingua::ZH::Currency::UpperCase; print chinese_currency_uc( 2504.39 ); The main subroutine get a number and give a chinese string which has been converted as currency...


Platforms: *nix

Alarm::Concurrent is a Perl module that allows multiple, concurrent alarms. This module is an attempt to enhance Perls built-in alarm/$SIG{ALRM} functionality. This function, and its associated signal handler, allow you to arrange for your program to receive a SIGALRM signal, which you can...


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

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

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

Paus is all about controlling "stuff" with easy scripts. You could for example make the light in your house go on and off in the way you specify. You also could use paus to create a remote controlled mp3box that also has a web-interface at the same time and shows the current song on an LCD...


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