/(\d+)(?{$' =~ m!(.{$1})!; print "$1\n"})/
Is this really the road you want to go down?
In reply to Re: Regex fun by Anonymous Monk in thread Regex fun by Hena