Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
use strict;
...
45656     me     what a use name
535353    McA    Supermonk *grin*
  2. or download this
        $hash{$number} = {
        number => $number,
        user => $user,
        comment => $comment,
    }
  3. or download this
        push @{$hash{$number}}, {
        number => $number,
        user => $user,
        comment => $comment,
    };