Help for this page

Select Code to Download


  1. or download this
    use strict;
    use warnings;
    ...
    print_lines($file);
    test("hello world\n");
    test_2("hello this is dog");
    
  2. or download this
    package My::Package;
    
    ...
        my ($input) = shift;
        print $input;
    }
    
  3. or download this
    this
    is
    a
    test!!!!