Help for this page
open(INF,"look.txt") || print "Cannot open look.txt file\n"; @look = <INF>; ... print "@fields[0],@fields[1],@fields[2],@fields[3],@fields[4],"; }
accred|143|0|0|412|0|0|0|0|0|0|0|0| accu-b|36|0|0|103|0|38|0|0|0|0|2|0| ... acegi|76|0|0|63|0|102|20|1|0|0|0|0| aceliv|4|0|0|275|0|59|0|0|0|3|0|0| ace130|31|0|0|93|0|19|0|0|0|0|0|0|