#!/usr/bin/perl
# URL that generated this code:
# http://txt2re.com/index.php3?s=42%2043&2&-10&-11&-13
$txt='42 43';
$re1='(4)'; # Any Single Character 1
$re2='(2)'; # Any Single Character 2
$re3='( )'; # Any Single Character 3
$re4='(\\d+)'; # Integer Number 1
$re=$re1.$re2.$re3.$re4;
if ($txt =~ m/$re/is)
{
$c1=$1;
$c2=$2;
$c3=$3;
$int1=$4;
print "($c1) ($c2) ($c3) ($int1) \n";
}
#-----
# Paste the code into a new perl file. Then in Unix:
# $ perl x.pl
#-----
 
Feedback
MikeN::
Thanks a lot for putting this out!
Thu, 9 May 2013 08:23PM
µē»°::
Fri, 10 May 2013 04:23AM
takobaba::
thank you, awesome work, awk pls :)
Fri, 10 May 2013 03:56PM
::
Fri, 10 May 2013 04:46PM
::
Fri, 10 May 2013 04:46PM
::
Yes.
Sat, 11 May 2013 09:18PM
exezaid::
bitch please
Sun, 12 May 2013 05:22PM
ron::
mark, this is awesome!
Sun, 12 May 2013 08:57PM
::
Bitch please, you must have a mental disease
Mon, 13 May 2013 12:25AM
::
lving it!
Mon, 13 May 2013 07:56AM
IpSeRc::
Simple, Concise, Usefull, PERFECT. Good App.
Mon, 13 May 2013 10:04AM
::
Round braces detection is not perfect. It skips the ones in middle if there are 2 braces groups. eg: (ab) (ab), it will detect "ab) (ab" in a round braces. At leas in my case.
Mon, 13 May 2013 11:20AM
canners.nl::
Dude: thank you so Much!! Regular Expressions can be such a headache!
Mon, 13 May 2013 12:44PM
::
Mon, 13 May 2013 02:28PM
::
Best of the best
Tue, 14 May 2013 06:14AM
Anup::
The best I ever use
Tue, 14 May 2013 06:26AM
Ruben::
Great stuff!!
Tue, 14 May 2013 02:49PM
::
Tue, 14 May 2013 04:39PM
::
Tue, 14 May 2013 07:32PM
::
Nice! Where's the "donate" link!
Tue, 14 May 2013 07:33PM
h::
h
Wed, 15 May 2013 02:56PM
::
Wed, 15 May 2013 05:02PM
slevin::
Mind blowing. Missing Objective-c, though!
Wed, 15 May 2013 06:35PM
Zayed::
THANKS A LOT!!!!!!!
Thu, 16 May 2013 05:35PM
::
Thu, 16 May 2013 06:36PM
::
awesome tool!!! thanks from brazil
Thu, 16 May 2013 06:38PM
::
good
Fri, 17 May 2013 08:25AM
Ad::
Just want I needed.. 2 Thrubms up
Fri, 17 May 2013 12:55PM
NEO::
Awesome, wish I found this years ago!
Fri, 17 May 2013 06:36PM
::
nonsense
Sun, 19 May 2013 05:44PM
kichwa_kibov::
lifesaver
Mon, 20 May 2013 02:53PM
I just...::
jizzed myself. This rocks!
Tue, 21 May 2013 03:59AM
fastnfurious::
thank you!
Tue, 21 May 2013 04:45AM
@JohnSReid::
Absolutely incredible
Tue, 21 May 2013 04:53PM
Menzo::
Thanks
Wed, 22 May 2013 12:32PM
::
excellent![/mrburns] too bad that there's no brainfuck-support though