Reading From a File

• open(FH, "<filename")

open(DICT,"</usr/dict/words"); # Open /usr/dict/words for reading

while ($line = <DICT>) { # Loop through each line

chomp($line);

print "$line "; # print out the words...

}

close(DICT); # close the filehandle

Previous slide

Next slide

Back to first slide

View graphic version