Help for this page

Select Code to Download


  1. or download this
    local @ARGV = $file_name;
  2. or download this
    local $^I = '';
  3. or download this
    local $/; # sluurp
  4. or download this
    local $_ = <>;
  5. or download this
    while ( chomp ) { }
  6. or download this
    print;