> 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: beginners-unsubscr...@perl.org For additional commands, e-mail: beginners-h...@perl.org http://learn.perl.org/
