What do you already know? Do you expect us to write the script for you? Why should we?

How to read from a file (The cmd-line way):
prompt> perl -we '@filecontents =<>' filename

How to read from a file (The script way):

#!/usr/bin/perl -w
use strict;
open FILEHANDLE, "< filename" 
    or die "Failed to open 'filename', $!";
my @contents = <FILEHANDLE>;
close FILEHANDLE;
[download]

How to read from a file (The OO way):

#!/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();
[download]

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;
use constant FILENAME => filename;

my $file = IO::File->new( "< ". FILENAME )
    or die "Failed to open '@{[FILENAME ]}', $!";
my @elements;
{
    local $/ = $/.$/;
    @elements = <$file>;
}
$file->close();
[download]

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.

---

---

• Are you posting in the right place? Check out Where do I post X? to know for sure.
• Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:

  <code> <a> <b> <big> <blockquote> <br /> <dd> <dl> <dt> <em> <font> <h1> <h2> <h3> <h4> <h5> <h6> <hr /> <i> <li> <nbsp> <ol> <p> <small> <strike> <strong> <sub> <sup> <table> <td> <th> <tr> <tt> <u> <ul>

• Snippets of code should be wrapped in <code> tags not <pre> tags. In fact, <pre> tags should generally be avoided. If they must be used, extreme care should be taken to ensure that their contents do not have long lines (<70 chars), in order to prevent horizontal scrolling (and possible janitor intervention).
• Want more info? How to link or How to display code and escape characters are good places to start.