Help for this page

Select Code to Download


  1. or download this
    use strict;
use warnings;
...
$string2 = join('',reverse(split('', $string2)));
print $string2;
  2. or download this
    H:\HTML_T~1\perl>perl regex.pl
/base-dir/dir/foo.txt INVALID ORDER-NO 4546090
...

INVALID ORDER-NO 4546090
INVALID ORDER-NO 4546090