Help for this page

Select Code to Download


  1. or download this
    my %date;
$date{1.1.2001}="Happy new year";
push @{$date{1.1.2001}, "Don't drink and drive";
  2. or download this
    for $event (@{$date{1.1.2001}) {
  print "$event on 1.1.2001\n"
}
  3. or download this
    -----------------------------------
--the good, the bad and the physi--
-----------------------------------