use strict; use IO::File; my $file = new IO::File('file.txt','r') or die"Error can't open file"; foreach my $line ($file->getlines) { my ($id, $name, $major, $email) = split(',',$line); chomp $email; }
In reply to Re: Help Me!
by Swalif
in thread Help Me!
by ajbrewe
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |