How can I read the lines of a file into an array in Perl?

Question

I have a file named test.txt that is like this:

Test
Foo
Bar

But I want to put each line in a array and pri

Answer 1

This is the simplest version I could come up with:

perl -l040 -pe';' < test.txt

---

Which is roughly equivalent to:

perl -pe'
  chomp; $\ = $/; # -l
  $\ = 040;       # -040
'

and:

perl -e'
  LINE:
    while (<>) {
      chomp; $\ = $/; # -l
      $\ = " ";       # -040
    } continue {
      print or die "-p destination: $!\n";
    }
'