Help for this page
Select Code to Download
Select
or
download this
my @nums = $split[1] =~ /^(\d{10})(\d{10})(\d{10})$/;
Select
or
download this
my @nums = unpack 'a10 a10 a10', $split[1];