Svg Graph 0 01

XML::UM is a Perl module to convert UTF-8 strings to any encoding supported by XML::Encoding. SYNOPSIS use XML::UM; # Set directory with .xml files that comes with XML::Encoding distribution # Always include the trailing slash! $XML::UM::ENCDIR =...

Iterator::IO is a Perl module with filesystem and stream iterators. SYNOPSIS use Iterator::IO; # Return the names of files in a directory (except . and ..) $iter = idir_listing ($path); # Return all the files in a directory tree, one at a time. # Like File::Find, in slow motion. $iter...

lapbubbles is a system monitoring theme for SuperKaramba. I just thought Id share this with you as is, as I wont work on it any time soon anymore (it works for me now, and I got tired of it). This is a further developped version of ubermon, which itself can be found at...


Platforms: *nix

Tie::Array::RestrictUpdates can limit the number of times you change elements in an array. SYNOPSIS use Tie::Array::RestrictUpdates; tie @foo,"Tie::Array::RestrictUpdates",1; # Default limit is 1. # Every element from the array can only be changed once @foo = qw(A B C D E); for(0..4) {...


Platforms: *nix

Unicode::Overload is a Perl source filter to implement Unicode operations. SYNOPSIS use charnames :full; use Unicode::Overload ( "N{UNION}" => infix => sub { my %a = map{$_=>1}@{$_[0]}; my %b = map{$_=>1}@{$_[1]}; return keys(%a,$b); }, "N{SUPERSCRIPT TWO}" => postfix => sub { $_[0] **...


Platforms: *nix

Statistics::Cluto package contains Perl binding for CLUTO. SYNOPSIS use Statistics::Cluto; use Data::Dumper; my $c = new Statistics::Cluto; $c->set_dense_matrix(4, 5, [ [8, 8, 0, 3, 2], [2, 9, 9, 1, 4], [7, 6, 1, 2, 3], [1, 7, 8, 2, 1] ]); $c->set_options({ rowlabels => [ row0,...


Platforms: *nix

Cache::Memcached::XS is a client library for memcached (memory cache daemon) using libmemcache. SYNOPSIS use Cache::Memcached::XS; $memd = new Cache::Memcached { servers => [ "10.0.0.15:11211", "10.0.0.15:11212", "10.0.0.17:11211", [ "10.0.0.17:11211", 3 ] ], compress_threshold =>...


Platforms: *nix

Data::BenchmarkResults is a Perl extension for averaging and comparing multiple benchmark runs. SYNOPSIS use Data::BenchmarkResults; $conditionA_results = new Data::BenchmarkResults; $conditionB_results = new Data::BenchmarkResults; #Load test result runs for the first condition...


Platforms: *nix

WWW::A9Toolbar is a class to allow perl to access the a9.com toolbar. SYNOPSIS use WWW::A9Toolbar; my $a9 = WWW::A9Toolbar->new( { email => my@email.address, password => mya9password, connect => 1 } ); my @bookmarks = $a9->find_bookmarks({ title => qr/searchtext/ }); my $newbookmark =...


Platforms: *nix

Yahoo::BBAuth is a Perl interface to the Yahoo! Browser-Based Authentication. SYNOPSIS my $bbauth = Yahoo::BBAuth->new( appid => $appid, secret => $secret, ); # Create an authentication link printf, $bbauth->auth_url; # After the user authenticates successfully, Yahoo returns the user...


Platforms: *nix

Tie::OffsetArray can tie one array to another, with index offset. SYNOPSIS use Tie::OffsetArray; tie @a, Tie::OffsetArray, 1, @b; # offset=1; use given array. tie @c, Tie::OffsetArray, 2; # use anonymous array. $a[0] = x; # assign to $b[1]; tied(@a)->array->[0] = y; # assign to $b[0]....


Platforms: *nix

POE::Component::ControlPort is a Perl module with network control port for POE applications. SYNOPSIS use POE; use Getopt::Long; use POE::Component::ControlPort; use POE::Component::ControlPort::Command; my @commands = ( { help_text => My command, usage => my_command [ arg1, arg2 ],...


Platforms: *nix

Weather::Bug is a Perl module that can get realtime weather where available. SYNOPSIS use Weather::Bug; my $w = get_live_weather( KCMI ); print "It is $w->{temp} degrees in $w->{location}n"; Weather::Bug uses data from aws.coms live Java weather applet. Not all available stations report...


Platforms: *nix

Term::Shell is a simple command-line shell framework. SYNOPSIS package MyShell; use base qw(Term::Shell); sub run_command1 { print "command 1!n"; } sub smry_command1 { "what does command1 do?" } sub help_command1 { <


Platforms: *nix

Audio::AMR::Decode is a Perl extension do decode .amr files. SYNOPSIS use Audio::AMR::Decode; Audio::AMR::Decode::amr2raw(infile.amr, outfile.pcm); This module will attempt to decode an amr encoded audio file to a raw pcm audio encoded file. The package contains C-source files for the...


Platforms: *nix

Inline::Select contains dynamic selection of ILSM for a package. SYNOPSIS use Inline::Select::Register ( PACKAGE => Calc, Inline => [ Perl => sub {require t/Calc.pm} ] ) ; use Inline::Select::Register ( PACKAGE => Calc, Inline => [ CPP => t/Calc.cpp ] ) ; use Inline::Select::Register...


Platforms: *nix

Hash::Diff::Dispatch allows to execute code depending on difference between hashes. SYNOPSIS my $hash_watcher = Hash::Diff::Dispatch->new( {}, # Sets the starting hash # The events will be called using the order returned # by calling keys on these values... b => &bold, i => &italic,...


Platforms: *nix

Tree::Visualize is a Perl module for visualizing Tree structures. SYNOPSIS use Tree::Visualize; use Tree::Binary; my $tree = Tree::Binary->new("*") ->setLeft( Tree::Binary->new("+") ->setLeft(Tree::Binary->new("2")) ->setRight(Tree::Binary->new("2")) ) ->setRight(...


Platforms: *nix

DateTime::Astro::Sunrise is a Perl DateTime extension for computing the sunrise/sunset on a given day. SYNOPSIS use DateTime; use DateTime::Astro::Sunrise; ^ my $dt = DateTime->new( year => 2000, month => 6, day => 20, ); my $sunrise = DateTime::Astro::Sunrise ->new(-118,33,undef,1);...


Platforms: *nix

Oracle::CAPI is a Perl XS wrapper extension for the Oracle Collaboration Suite CAPI SDK. SYNOPSIS use Oracle::CAPI; use Text::vCard; Oracle::CAPI::SetConfigFile($CAPI_INI_FNAME,$CAPI_LOG_FNAME) && die("Cant init/log CAPI"); $capi_session = Oracle::CAPI::CreateSession() || die("Cant create...


Platforms: *nix