File Perl

  1. Home
  2. Perl
  3. File
  4. To read from a file
while(){ print; }      # Read one line at a time from file.
@lines = ;             # Slurp all lines into an array.
print "@lines\n";