Help for this page

Select Code to Download


  1. or download this
    open(FILE1, $ARGV[0]);
    while($line = <FILE1>) {
            chomp($line);
    ...
    }
    
    print "\n";
    
  2. or download this
    __DATA1__
    trip    value1    value2
    ...
    trip    value1    value2   value3
    ATG    adsad    dsf    asdas
    TTA    24312    144    24