Dariush Debian Diary
Diariusz Dariusza
, 21, 2005
Perl Modules Missing From Debian
(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
Last modified on
, 17, 2005
1111011310.....
#!/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;
Last modified on
use DBM::Deep
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.
Last modified on
, 09, 2004
Timeout....
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
Last modified on
Copyright ©1995-2004 Dariush Pietrzak. All content on this website, unless otherwise noted, is licensed under a Creative Commons License.
Using desktop theme, version 0.5. Check the Blosxom site for the latest copy.
