Help for this page

Select Code to Download


  1. or download this
    
            foreach(@suffix) {
...
                    $v{$mn}{$sd}{$sf} = $_ ;
                }
....
  2. or download this
     
while ($foo = <DATA>) {
    $v{$mn}{$sd}{$sf} = $foo;
}