Help for this page
Select Code to Download
Select
or
download this
my $num = qr! [+-]? ... (?: \d*?)? (?: \d[Ee] (?: [+-]?\d+ ) )? !ox;