Help for this page

Select Code to Download


  1. or download this
    use Data::Dumper;
    $Data::Dumper::Useqq = 1;
    ...
    __END__
    this is ctrl-Z:^Z    # note: real ctrl-Z there
    this is past ctrl-z
    
  2. or download this
    /ned $ perl binmode.pl binmode.pl
    $VAR1 = "use Data::Dumper;\n";
    ...
    $VAR1 = "}\n";
    $VAR1 = "__END__\n";
    $VAR1 = "this is ctrl-Z:";