Help for this page

Select Code to Download


  1. or download this
    
my $lines = join "", <DATA>;
...

======
line after break line
  2. or download this
    line 1======
line after break line
  3. or download this
    line 1
======
line after break line
  4. or download this
    $/ = '=';
while (<DATA>) {
...

======
line after break line
  5. or download this
    line 1
======
line after break line