Help for this page

Select Code to Download


  1. or download this
     { 
        my $s;  do{ local( @ARGV, $/)='1gb.db'; $s = <> }; <STDIN>; 
        my $t = do{ local( @ARGV, $/)='1gb.db';      <> }; <STDIN> 
    };;