Help for this page

Select Code to Download


  1. or download this
    use strict;
use warnings;
...

substr $str, $_, 0, qq{$path.} for reverse @posns;
say $str;
  2. or download this
    (XX.YY.ZZ.ABC | (~XX.YY.ZZ.dEf & XX.YY.ZZ.hI_J)) & ~XX.YY.ZZ.LMn if ~X
+X.YY.ZZ.xYz