Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl

...
  my $onelarger = s/([^\xff])\xff*\z/ $1 =~ tr||\x01-\xff|cr /er;
  dd 'out', $onelarger;
  }
  2. or download this
    ("in", "aa")
("out", "ab")
...
("out", "b")
("in", "frequency/is/measured/in/hertz")
("out", "frequency/is/measured/in/hert{")