Help for this page

Select Code to Download


  1. or download this
    use strict;
    use warnings;
    
  2. or download this
    my %table = (
       "\x00" => "\x17",
    ...
    # and then substitute:
    
    $str =~ s/($re)/$table{$1}/g