#!/usr/bin/perl
# URL that generated this code:
# http://txt2re.com/index.php3?s=42%2043&2&-5&-8&-1
$txt='42 43';
$re1='(42)'; # Integer Number 1
$re2='( )'; # White Space 1
$re3='(\\d+)'; # Integer Number 2
$re=$re1.$re2.$re3;
if ($txt =~ m/$re/is)
{
$int1=$1;
$ws1=$2;
$int2=$3;
print "($int1) ($ws1) ($int2) \n";
}
#-----
# Paste the code into a new perl file. Then in Unix:
# $ perl x.pl
#-----
 
Feedback
::
thks
Wed, 29 May 2013 01:24AM
::
mmamt suchucazz attacat nanz u can randag i nonnt
Wed, 29 May 2013 10:53AM
zk::
great work! super useful, thanks so much!!
Wed, 29 May 2013 05:52PM
KisnardOnline::
perfect perfect perfect... get some ads on this site, so we can thank you more
Wed, 29 May 2013 10:21PM
ShubhamGupta::
Saved my day!
Wed, 29 May 2013 11:36PM
::
Thu, 30 May 2013 12:02AM
Astarte::
Awesome, just awesome!
Thu, 30 May 2013 12:03AM
David Dawkins::
Excellent tool, where's the donate link? thank-you !!!