Help for this page
open(DAT,"C:\\StudyPerl\\Projects\\tab_file.txt") || die "Could not op +en the file"; my @line; ... foreach $1 (@array1){ print "The element is: $1\n"; }