Help for this page

Select Code to Download


  1. or download this
        my( @vals, @odds ); ( $vals[ @vals ], $odds[ @odds ] ) = split( ' 
+' ) for <$fh>;
  2. or download this
        my( @vals, @odds ); ( $vals[ @vals ], $odds[ @odds ] ) = split( ' 
+' ) for <$fh>;