OPEN and READ a Data File in Perl

You need to get data from the file "cities.txt"

Example Unix Data File (cities.txt):

London
Paris
Tokyo


open(DA, "<cities.txt");
@huhu=<DA>;
close(DA);

print $huhu[2];

Which Prints:

Tokyo


-The left arrow before cities.txt means READ file. (full or relative path if in different directory)
-The contents of cities.txt is now stored in the array @huhu
-The words DA are called a Filehandle. Always use ALL CAPS for filehandles. The DA could be pretty much anything you like except STDIN and STDOUT, which are reserved for other things.


NOTE on How Data is Read:

Depending on your platform, the data may already be pieced out. If the data file was stored with a UNIX text editor, Perl automatically splits @huhu into pieces by line returns.

If the the file was stored another way, you can SPLIT the array @huhu into chunks of data.


Start Copy and Paste Perl Code (you'll need to create a file named cities.txt in the same directory as script):

#!/usr/bin/perl

print "Content-type:text/html\n\n";

open(DA, "<cities.txt");
@huhu=<DA>;
close(DA);

print $huhu[2];

exit;

Open and Read Data File - See in Action (new window)


Click HERE to comment or discuss at iLoveTheCode GOOGLE Group

Previous Article: Use the Perl PRINT FUNCTION

Next Article: Matching with a Regular Expression, REGEX, in Perl

Information Architecture for the Wor... Louis Rosenfeld, P... New $26.39	CSS Eric Meyer New $29.69	CSS David McFarland New $23.09
CSS Mastery Andy Budd, Simon C... New $23.85	HTML, XHTML, and CSS, Sixth Edition ... Elizabeth Castro New $23.09	jQuery in Action Bear Bibeault, Yeh... New $26.39
Learning Web Design Jennifer Niederst ... New $26.99	Build Your Own Website The Right Way... Ian Lloyd New $19.77	Head First HTML with CSS & XHTML Eric Freeman, Elis... New $23.99

Privacy Information