Help for this page

Select Code to Download


  1. or download this
    c:\@Work\Perl\monks>perl -wMstrict -MData::Dump -le
"use Regexp::Common qw /net/;
...
["1.2.3.4", "12.23.34.45", "9.9.9", "x.x.x.x", "anything"]

["1.2.3.4", "12.23.34.45"]
  2. or download this
    c:\@Work\Perl\monks>perl -wMstrict -MData::Dump -le
"use Regexp::Common qw /net/;
...
 dd \@temp;
"
["1.2.3.4", "12.23.34.45"]