/perl-sql-splitstatement/