Help for this page

Select Code to Download


  1. or download this
    local @ARGV = @_;
    require ARGV::readonly;
    ARGV::readonly->import; ## THIS!!!
    
  2. or download this
    local @ARGV = @_;
    # Tom Christiansen in Message-ID: <24692.1217339882@chthon>
    # reccomends essentially the following:
    ...
       s/^/< /;        # force open for input
       $_.=qq/\0/;    # trailing whitespace preserved & pipes forbidden
    };