use warnings; use strict; use Data::Dump; my @sqltt = <