my $fixed_point_re = qr/\d*\.?\d*/;