my $stmts = do { local $/; open my $sqlFH, q{<}, q{file.sql} or die qq{open: file.sql: $!\n}; <$sqlFH>; };