in reply to How to Breakup Numbers

my @phone_arr = unpack( 'A3A3A4', $phone_string );

$phone_arr[0] will contain the area-code, etc.

In Section Seekers of Perl Wisdom