Help for this page

Select Code to Download


  1. or download this
    my $pattern = q/(...)(...)/;
my $replace = q/$2-$1/;
s/$pattern/$replace/g;
  2. or download this
    my $pattern = q/(...)(...)/;
my $replace = q/$2-$1/;
s/$pattern/qq{$replace}/eeg;