Help for this page

Select Code to Download


  1. or download this
    my @now = localtime();
$now[4]++; $now[5] += 1900;
...

my $ddmmyyyy = $now[3] . $now[4] . $now[5];
my $hhmmss   = $now[2] . $now[1] . $now[0];
  2. or download this
    2;0 juerd@ouranos:~$ perl -e'undef christmas'
Segmentation fault
2;139 juerd@ouranos:~$