Perl: Reading Files
In Perl, files can be read using handles as follows: Suppose, you want to read a following file called "program.txt" that contains following data using perl program:
1: perl 2: php 3: java 4: jsp
The program that would read this and print languages is:
#!/usr/bin/perl $fileName="program.txt"; open( fileHandle, $fileName); while(){ chop; # chop is used to remove \n ('end of line' from each line). my($id, $language) = split(':', $_); print "Language is $language \n"; }
The output of the above file is:
Language is perl Language is php Language is java Language is jsp
Post Comment