$a = '059057034037063107105003046039039036107063035046';

##</code><code>##

my @nums = split(/(\d{3})/,$a);