Help for this page
package Your::SQL::Utils; ... } sub other_query { ... }
# your_prog.pl ... my $util = Your::SQL::Utils::->new(); $util->$query();
$ your_prog.pl -q some_query