Added --preserve-embedded-numbers. Still nedd to add tests

t/lib/QueryRewriter.t

@@ -1465,6 +1465,18 @@ is(
 );
 
 
+$qr = new QueryRewriter(
+   QueryParser => $qp,
+   match_embedded_numbers => 1,
+);
+
+is(
+   $qr->fingerprint(
+      "SELECT * FROM prices2.t1 where id=1"
+   ),
+   "select * from prices2.t1 where id=?",
+   "Fingerprint db.tbl<number>name (preserve number)"
+);
 
 # #############################################################################
 # Done.

t/pt-query-digest/explain.t

@@ -107,6 +107,23 @@ ok(
    "--explain sparkline uses event db and doesn't crash ea (issue 1196)"
 );
 
+$sb->load_file('master', "t/pt-query-digest/samples/issue_1604834.sql");
+#
+warn "$trunk/t/pt-query-digest/samples/issue_1196.log";
+ok(
+   no_diff(
+      sub { pt_query_digest::main(@args,
+         '--report-format', 'profile,query_report', "--preserve-embedded-numbers",
+         "$trunk/t/pt-query-digest/samples/issue_1196.log",)
+      },
+      (  $sandbox_version ge '5.7' ? "$sample/issue_1196-output-5.7.txt"
+       : $sandbox_version ge '5.6' ? "$sample/issue_1196-output-5.6.txt"
+       : $sandbox_version ge '5.1' ? "$sample/issue_1196-output.txt"
+       :                             "$sample/issue_1196-output-5.0.txt"),
+   ),
+   "--preserve-embedded-numbers"
+);
+
 # #############################################################################
 # Done.
 # #############################################################################

t/pt-query-digest/samples/issue_1604834.sql

@@ -0,0 +1,5 @@
+drop database if exists issue_1196;
+create database issue_1196;
+use issue_1196;
+create table t (a int);
+insert into t values (1),(2),(4),(5),(20),(20900),(228),(33),(89),(22828),(9292),(3939),(1111),(0);