in reply to splitting a number into several numbers
A nice simple match will cover it:
my ($var1, $var2, $var3) = $numberstring =~ /(\d{2})/g;
-- Steve Marvell