my $number = qr{ \b\d+ | \b\d+\.\d+\ | \b\.\d+ .... }x;