Help for this page

Select Code to Download


  1. or download this
    use strict;

...
@lines = <INFO1>;        # Read it into an array
close(INFO1);            # Close the file
print @lines;            # Print the array
  2. or download this
    D:\Perl_Samples>perl file_Modify.pl
Alpha
...
Chi
Delta
Epsilon