Mailing List Archive

Syslog.pm
Sorry if this has been reported already but in Sys/Syslog.pm I see:

$af_unix = 1;
$af_inet = 2;

$stream = 1;
$datagram = 2;

This does not work on all systems. Why not using Socket.pm?

Lionel Cons

+------- CERN - European Laboratory for Particle Physics -------+
| E-mail: Lionel.Cons@cern.ch |
| Earth-mail: CN/DCI/UWS, CERN, CH-1211 GENEVE 23, Switzerland |
| Phone: + (41 22) 767 49 13 Fax: + (41 22) 767 71 55 |
+---------------------------------------------------------------+

#!/usr/local/bin/perl5
@x=('no bawujts','mx ypihtre','ercqkg lah');
@y=(793633,793634,793633);
$x=join('',grep(eval("\$_*=97,tr/0-9/$x[$x++]/"),@y));
print "\u$x!\n";