(todo list for debian-perl;)

• Catalyst
• Net::Lite::FTP (;)
• Crypt::MatrixSSL
• Maypole(see Catalyst)
• PAR
• Config::Scoped / Error

time nice fakeroot dh-make-perl --build --cpan Net::Jabber::Server
time nice fakeroot dh-make-perl --build --cpan Authen::SASL
time nice fakeroot dh-make-perl --build --cpan Net::BEEP::Lite
time nice fakeroot dh-make-perl --build --cpan Net::BEEP::Lite::TLSProfile
time nice fakeroot dh-make-perl --build --cpan DBD::SQLite
time nice fakeroot dh-make-perl --build --cpan WSDL::Generator
time nice fakeroot dh-make-perl --build --cpan Class::Hook
#time nice fakeroot dh-make-perl --build --cpan Coro
time nice fakeroot dh-make-perl --build --cpan Event
time nice fakeroot dh-make-perl --build --cpan Bloom::Filter
time nice fakeroot dh-make-perl --build --cpan Net::OSCAR
time nice fakeroot dh-make-perl --build --cpan NetPacket::Ethernet
dh-make-perl --build --cpan Archive::Zip;dh-make-perl --build --cpan Module::ScanDeps;
echo dh-make-perl --build --cpan PAR::Dist
echo dh-make-perl --build --cpan PAR

dh-make-perl --build --cpan Crypt::DSA; dh-make-perl --build --cpan Cryp::RSA;dh-make-perl --build --cpan Math::Pari;dh-make-perl --build --cpan Data::Buffer
dh-make-perl --build --cpan  Net::Pcap
dh-make-perl --build --cpan  Net::PcapUtils;dh-make-perl --build --cpan  NetPacket::Ethernet;dh-make-perl --build --cpan  NetPacket::IP
time nice fakeroot dh-make-perl --build --cpan Tie::DBI
time nice fakeroot dh-make-perl --build --cpan Tie::RDBMS
dh-make-perl --build --cpan Net::Rendezvous
dh-make-perl --build --cpan NetworkInfo::Discovery::Rendezvous
dh-make-perl --build --cpan NetworkInfo::Discovery::Nmap
dh-make-perl --build --cpan  NetworkInfo::Discovery::Register
dh-make-perl --build --cpan  NetworkInfo::Discovery::Detect
dh-make-perl --build --cpan  NetworkInfo::Discovery::Sniff
dh-make-perl --build --cpan  NetworkInfo::Discovery::Traceroute
dh-make-perl --build --cpan  NetworkInfo::Discovery::Scan
dh-make-perl --build --cpan Tk::Canvas
dh-make-perl --build --cpan Socket
dh-make-perl --build --cpan Net::Traceroute
dh-make-perl --build --cpan Net::Pcap
dh-make-perl --build --cpan NetPacket::Ethernet
dh-make-perl --build --cpan NetPacket::IP
dh-make-perl --build --cpan NetPacket::TCP
dh-make-perl --build --cpan NetPacket::UDP
dh-make-perl --build --cpan NetPacket::ARP
dh-make-perl --build --cpan NetPacket::ICMP
dh-make-perl --build --cpan Graph::Reader::XML
dh-make-perl --build --cpan Net::DNS
dh-make-perl --build --cpan File::Find::Rule::MMagic
dh-make-perl --build --cpan File::Find::Rule::ImageSize

#!/usr/bin/perl

use strict;

use Gtk2 -init;
use Glib qw(TRUE FALSE);

my $window = Gtk2::Window->new;
$window->signal_connect(delete_event => sub { Gtk2->main_quit; });

my $label = Gtk2::Label->new('' . time());
my $font = Gtk2::Pango::FontDescription->from_string("Sans Bold 48");
$label->modify_font($font);

Glib::Timeout->add(250, sub { $label->set_text('' . time()); TRUE; });

$window->add($label);

$window->show_all;

Gtk2->main;

  use DBM::Deep;
	my $db = new DBM::Deep "foo.db";

	$db->{key} = 'value'; # tie() style
	print $db->{key};

	$db->put('key', 'value'); # OO style
	print $db->get('key');

	# true multi-level support
	$db->{my_complex} = [
	'hello', { perl => 'rules' }, 
42, 99 ];

DESCRIPTION

A unique flat-file database module, written in pure perl. True multi-level hash/array support (unlike MLDBM, which is faked), hybrid OO / tie() interface, cross-platform FTPable files, and quite fast. Can handle millions of keys and unlimited hash levels without significant slow-down. Written from the ground-up in pure perl -- this is NOT a wrapper around a C-based DBM. Out-of-the-box compatibility with Unix, Mac OS X and Windows.

val {
    local $SIG{ALRM} = sub { die "alarm timeout" };
    local $SIG{__DIE__} = sub { alarm 0; die @_ };
    alarm $timeout;
    # operation you're waiting on which might die()
    # in the grandparent post, this was 
    # $line=<$child>
    alarm 0;        # cancel the alarm
};
die $@ if $@ && $@ !~ /alarm timeout/;
if ($@) {
    # Whatever you want on an alarm timeout
}

( from perlmonks post by fizbin ):w