Here is my code for reading in the input file
open (FILTER,"$filter_file"); my @filter; <FILTER>; # read one line from the file [HEADERS] while (<FILTER>) { # read other lines chomp; # remove "\n" from the end of the line push @filter,[(split /\t/,$_)]; # create an array of the line +by s$ } @filter = sort { $a->[5] <=> $b->[5] } @filter; # sort the array #--------------------------------------------------------------------- +----$ #PRINTS REFERENCES TO ARRAY FROM LEAST TO GREATEST REGARDING 'ORDER' C +OLUMN print Dumper \@filter; #### For Debugging Purposes
In reply to Re^4: No output to screen or output file
by dkhalfe
in thread No output to screen or output file
by dkhalfe
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |