How to read from a file (The cmd-line way):
prompt> perl -we '@filecontents =<>' filename
How to read from a file (The script way):
How to read from a file (The OO way):#!/usr/bin/perl -w use strict; open FILEHANDLE, "< filename" or die "Failed to open 'filename', $!"; my @contents = <FILEHANDLE>; close FILEHANDLE;
So you see, your question is not straight forward. The answer that I would give is:#!/usr/bin/perl -w use strict; use IO::File; my $file = IO::File->new( "< filename" ) or die "Failed to open 'filename', $!"; my @contents = <$file>; $file->close();
With the hopes that my way contains so many perlisms that if your question is for HW that your teacher will recognize the plagarism, and that if you are truly trying to learn, then you will have plenty to figure out while perusing the library.#!/usr/bin/perl -w use strict; use IO::File; use constant FILENAME => filename; my $file = IO::File->new( "< ". FILENAME ) or die "Failed to open '@{[FILENAME ]}', $!"; my @elements; { local $/ = $/.$/; @elements = <$file>; } $file->close();
In reply to Re: Populating an array
by Adam
in thread Populating an array
by Anonymous Monk
For: | Use: | ||
& | & | ||
< | < | ||
> | > | ||
[ | [ | ||
] | ] |