Select Code to Download

$ diff -u Tiny.pm.orig Tiny.pm
--- Tiny.pm.orig    2015-07-06 12:51:54.000000000 -0400
...
             next;
         }

$ perl test.pl
[insert]
...
SQL1 = update into <table1>
SQL2 = update into <table2>