my $re_num = qr{
              [+-]?
              (?:
                \d+
                (?:[.]\d*)?
                |[.]\d+
              )
              (?:e[+-]?\d+)?
              \b
             }x;                             # Float/real into N
my $re_hexbin = qr{\b0(?:x[0-9a-f]+|b[01]+)\b};  # Hex/bin into N
my $num_combined = qr{ $re_num | $re_hexbin };

$query =~ s/$num_combined/N/g;