> while(<DATA>){
Use of a File Handle in this case would be better> my ($key, $value) = split (/\t/,$_); and Use "\s+" instead of "\t" . -- To unsubscribe, e-mail: [email protected] For additional commands, e-mail: [email protected] http://learn.perl.org/
