Perl Module Contact Php

Archive::Zip is a Perl module which provides an interface to ZIP archive files. SYNOPSIS # Create a Zip file use Archive::Zip qw( :ERROR_CODES :CONSTANTS ); my $zip = Archive::Zip->new(); # Add a directory my $dir_member = $zip->addDirectory( dirname/ ); # Add a file from a string with...

File::PathList is a Perl module that can find a file within a set of paths (like @INC or Java classpaths). SYNOPSIS # Create a basic pathset my $inc = File::PathList->new( @INC ); # Again, but with more explicit params my $inc2 = File::PathList->new( paths => @INC, cache => 1, ); #...

File::Remove is a Perl module to remove files and directories. SYNOPSIS use File::Remove qw(remove); # removes (without recursion) several files remove qw( *.c *.pl ); # removes (with recursion) several directories remove 1, qw( directory1 directory2 ); # removes (with recursion)...


Platforms: *nix

CPAN::Cache is a Perl module abstract locally-cached logical subset of a CPAN mirror. There have been any number of scripts and modules written that contain as part of their functionality some form of locally stored partial mirror of the CPAN dataset. CPAN::Cache does the same thing, except...


Platforms: *nix

Class::Adapter::Builder is a Perl module that can generate Class::Adapter classes. SYNOPSIS package My::Adapter; use strict; use Class::Adapter::Builder ISA => Specific::API, METHODS => [ qw{foo bar baz} ], method => different_method; 1; Class::Adapter::Builder is another mechanism...


Platforms: *nix

HTML::FormHighlight Perl module can help you to highlights fields in an HTML form. SYNOPSIS use HTML::FormHighlight; my $h = new HTML::FormHighlight; print $h->highlight( scalarref => $form, fields => [ A, B, C ], ); print $h->highlight( scalarref => $form, fields => [ A, B, C ],...


Platforms: *nix

Test::Exception is a Perl module to test exception based code. SYNOPSIS use Test::More tests => 5; use Test::Exception; # or if you dont need Test::More use Test::Exception tests => 5; # then... # Check that something died dies_ok { $foo->method1 } expecting to die; # Check that...


Platforms: *nix

Template::Ast is a Perl module to process ASTs for Perl Template Toolkit. SYNOPSIS use Template::Ast; # Rebuild AST stored in file: $ast = Template::Ast->read(foo.ast) or die Template::Ast->error(); # Writing existing AST to file: $ast = { Marry => [24, F], John => [21, M] };...


Platforms: *nix

Religion::Islam::PrayerTimes is a Perl module that calculates Muslim Prayers Times and Sunrise. SYNOPSIS use Religion::Islam::PrayerTimes; #create new object with default options my $prayer = Religion::Islam::PrayerTimes->new(); #Juristic Methods: # 1 = Standard (Imams Shafii, Hanbali,...


Platforms: *nix

Religion::Islam::Qibla is a Perl module that calculates the Muslim Qiblah Direction, Great Circle Distance, and Great Circle Direction. SYNOPSIS use Religion::Islam::Qibla; #create new object with default options, Destination point is Kabah Lat=21 Deg N, Long 40 Deg E my $qibla =...


Platforms: *nix

Text::TemplateFill is a Perl module for formatting of reports with templates from files, use for I18N. SYNOPSIS use Text::TemplateFill; my $tmpl = new Text::TemplateFill; $tmpl->SetOpt(BaseDir => "paras/$Country"); $tmpl->SetOpt(ErrorFunction => &LogMsg, LineTerminator => "rn"); # Must...


Platforms: *nix

dump_kstat is a Perl module created to dump the kstat structure. This simple script dumps the entire kstat structure to stdout - useful for figuring out what statistics are available. EXAMPLES $ dump_kstat audio.0.audioc0 class = controller audio.0.audioc0 crtime = 3533.04802622...


Platforms: *nix

Solaris::MapDev Perl module contains a map between instance numbers and device names. SYNOPSIS use Solaris::MapDev qw(inst_to_dev dev_to_inst); my $disk = inst_to_dev("sd0"); my $nfs = inst_to_dev("nfs123"); my $inst = dev_to_inst("c0t0d0s0"); mapdev_data_files(path_to_inst =>...


Platforms: *nix

Solaris::Kstat is a Perl module to access Solaris Kstats from Perl. SYNOPSIS use Solaris::Kstat; my $kstat = Solaris::Kstat->new(); my ($usr1, $sys1, $wio1, $idle1) = @{$kstat->{cpu_stat}{0}{cpu_stat0}}{qw(user kernel wait idle)}; print("usr sys wio idlen"); while (1) { sleep 5; if...


Platforms: *nix

XML::DocStats is a Perl module to produce a simple analysis of an XML document. SYNOPSIS Analyze the xml document on STDIN, the STDOUT output format is html: use XML::DocStats; my $parse = XML::DocStats->new; $parse->analyze; Analyze in-memory xml document: use XML::DocStats; my...


Platforms: *nix

Sys::OutPut is a Perl module to help make output easier. SYNOPSIS usage Sys::OutPut; talk $fmtstr [, @args]; out $fmtstr [, @args]; put $fmtstr [, @args]; err $fmtstr [, @args]; debug $fmtstr [, @args]; $Sys::OutPut::quiet = $::quiet; $Sys::OutPut::debug = $::debug; These...


Platforms: *nix

Filesys::DiskFree is a Perl module to perform the Unix command df in a portable fashion. SYNOPSIS use Filesys::DiskFree; $handle = new Filesys::DiskFree; $handle->df(); print "The root device is ".$handle->device("/")."n"; print "It has ".$handle->avail("/")." bytes availablen"; print...


Platforms: *nix

Decision::Markov is a Perl module with markov models for decision analysis. SYNOPSIS use Decision::Markov; $model = new Decision::Markov; $state = $model->AddState("Name",$utility); $error = $model->AddPath($state1,$state2,$probability); $error = $model->Check...


Platforms: *nix

XML::Writer::Simple is a Perl module to create XML files easily! SYNOPSIS use XML::Writer::Simple dtd => "file.dtd"; print para("foo",b("bar"),"zbr"); USAGE This module takes some ideas from CGI to make easier the life for those who need to generated XML code. You can use the module in...


Platforms: *nix

Text::RewriteRules Perl module contains a system to rewrite text using regexp-based rules. SYNOPSIS use Text::RewriteRules; RULES email .==> DOT @==> AT ENDRULES email("ambs@cpan.org") # returns ambs AT cpan DOT org RULES/m inc (d+)=e=> $1+1 ENDRULE inc("I saw 11 cats and 23...


Platforms: *nix