Help for this page

Select Code to Download


  1. or download this
    $\ = $endofline;
    print OUTFILE $processed_string; # Appends the wanted end of line corr
    +ectly
    
  2. or download this
    {
      local $\ = $endofline;
      my $old_handle = select OUTFILE;
    ...
      select $old_handle;
    }
    # $\ has its old value again