Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w
    use strict;
    ...
    
    __DATA__
    First line. Second Line. Third line. Fourth line.
    
  2. or download this
    @lines = (
               'First line.',
    ...
               ' Third line.',
               ' Fourth line.'
             );