Funny Or Die Pearl Landlord Baby

Uli's Moose is the official successor to the Talking Moose, the Talking jokester for Macintosh. It will pop up from time to time and say something witty, funny, or utterly useless.Hundreds of phrases, lip-synched animation of several Mooses and a few other characters.

MP3::Icecast is a Perl module to generate Icecast streams, as well as M3U and PLSv2 playlists. SYNOPSIS use MP3::Icecast; use MP3::Info; use IO::Socket; my $listen_socket = IO::Socket::INET->new( LocalPort => 8000, #standard Icecast port Listen => 20, Proto => tcp, Reuse => 1,...

Net::DNS::ValueDomain::DDNS is a Perl module to update your Value-Domain (https://www.value-domain.com/) DynamicDNS records. SYNOPSIS use Net::DNS::ValueDomain::DDNS; # Normal usage my $ddns = Net::DNS::ValueDomain::DDNS->new; $ddns->update( domain => example.com, password => 1234,...


Platforms: *nix

Chipcard::CTAPI is a Perl module for communication with chipcard terminals. SYNOPSIS use Chipcard::CTAPI; my $ct = new Chipcard::CTAPI(interface => Χpcard::CTAPI::PORT_COM1) or die "Cant communicate with card terminal"; my $memory_size = $ct->getMemorySize(); $ct->read(0,...


Platforms: *nix

MP4::Info is a Perl module that can fetch info from MPEG-4 files (.mp4, .m4a, .m4p, .3gp). SYNOPSIS #!perl -w use MP4::Info; my $file = Pearls_Before_Swine.m4a; my $tag = get_mp4tag($file) or die "No TAG info"; printf "$file is a %s trackn", $tag->{GENRE}; my $info =...


Platforms: *nix

File::Sync is a Perl access to fsync() and sync() function calls. SYNOPSIS use File::Sync qw(fsync sync); fsync(*FILEHANDLE) or die "fsync: $!"; sync(); use File::Sync qw(fsync); use IO::File; $fh = IO::File->new("> /tmp/foo") or die "new IO::File: $!"; ... fsync($fh) or die "fsync:...


Platforms: *nix

Speech::Recognizer::SPX::Server is a Perl module for writing streaming audio speech recognition servers using Sphinx2. SYNOPSIS my $sock = new IO::Socket(... blah blah blah ...); my $log = new IO::File(server.log); my $audio_fh = new IO::File(speech.raw); my $srvr =...


Platforms: *nix

GD::Graph is a graph plotting module for Perl 5. SYNOPSIS use GD::Graph::moduleName; GD::Graph is a perl5 module to create charts using the GD module. The following classes for graphs with axes are defined: GD::Graph::lines Create a line chart. GD::Graph::bars and GD::Graph::hbars...


Platforms: *nix

Net::Telnet::Netscreen is a Perl module that interacts with a Netscreen firewall. Net::Telnet::Netscreen is mostly a pure rippoff of Net::Telnet::Cisco, with adaptations to make it work on the Netscreen firewalls. It also has some additional commands, but for basic functionality, see...


Platforms: *nix

DBIx::SQLCrosstab::Format is a Perl module with formats results created by DBIx::SQLCrosstab. SYNOPSIS use DBIx::SQLCrosstab::Format; my $dbh=DBI->connect("dbi:driver:database" "user","password", {RaiseError=>1}) or die "error in connection $DBI::errstrn"; my $params = { dbh => $dbh,...


Platforms: *nix

Lingua::Phonology::FileFormatPOD is a Perl module that contains documentation for the xml file format written and read by Lingua::Phonology. As of v0.3, Lingua::Phonology is able to read and write an XML file that defines a complete Lingua::Phonology object. This file is meant to be...


Platforms: *nix

Net::DHCP::Packet is a Perl module with object methods to create a DHCP packet. SYNOPSIS use Net::DHCP::Packet; my $p = new Net::DHCP::Packet->new( Chaddr => 000BCDEF, Xid => 0x9F0FD, Ciaddr => 0.0.0.0, Siaddr => 0.0.0.0, Hops => 0); Represents a DHCP packet as specified in RFC 1533,...


Platforms: *nix

Audio::OSS is a pure-perl interface to OSS (open sound system) audio devices. SYNOPSIS use Audio::OSS qw(:funcs :formats :mixer); my $dsp = IO::Handle->new(" dsp_reset($dsp) or die "reset failed: $!"; my $mask = get_supported_formats($dsp); if ($mask & AFMT_S16_LE) { set_fmt($dsp,...


Platforms: *nix

XML::LibXML::Reader is a Perl interface to libxml2 pull parser. SYNOPSIS use XML::LibXML::Reader; $reader = new XML::LibXML::Reader("file.xml") or die "cannot read file.xmln"; while ($reader->read) { processNode($reader); } sub processNode { $reader = shift; printf "%d %d %s %dn",...


Platforms: *nix

File::stat is a by-name interface to Perls built-in stat() functions. SYNOPSIS use File::stat; $st = stat($file) or die "No $file: $!"; if ( ($st->mode & 0111) && $st->nlink > 1) ) { print "$file is executable with lotsa linksn"; } use File::stat qw(:FIELDS); stat($file) or die "No...


Platforms: *nix

Empire Online II is a free online multi-player strategy game. In this game, you are a young monarch, must use production, construction, wars, diplomacy and all possible means to protect the country. You will be able to decide the country's destiny: suffers bullying, or gains a prominent...


Platforms: Windows

Audio::SPX is a Perl interface to the Sphinx-II audio library. SYNOPSIS use Audio::SPX; my $ad = Audio::SPX->open_sps(16000); $ad->start_rec or die "start_rec failed"; $ad->stop_rec or die "stop_rec failed"; my $samples = $ad->read($buf, $max); my $cad =...


Platforms: *nix

DBIx::SQLCrosstab Perl module creates a server-side cross tabulation from a database. SYNOPSIS use DBIx::SQLCrosstab; my $dbh=DBI->connect("dbi:driver:database" "user","password", {RaiseError=>1}) or die "error in connection $DBI::errstrn"; my $params = { dbh => $dbh, op => [ [SUM,...


Platforms: *nix

PerlIO::via::Logger is a PerlIO layer for prefixing current time to log output. SYNOPSIS use PerlIO::via::Logger; PerlIO::via::Logger->format( [%b %d, %Y %r] ); use PerlIO::via::Logger format => [%b %d, %Y %r] ; open( my $in,<:via(Logger),filein ) or die "Cant open file.ln for reading:...


Platforms: *nix

Image::ParseGIF can parse a GIF image into its compenent parts. SYNOPSIS use Image::ParseGIF; $gif = new Image::ParseGIF ("image.gif") or die "failed to parse: $@n"; # write out a deanimated version, showing only the first frame $gif->deanimate(0); # same again, manually printing each...


Platforms: *nix