Help for this page
Select Code to Download
Select
or
download this
(?:\s*\d){8}
Select
or
download this
my ($numbers) = $string =~ /(5163(?:\s*\d){8})/;