Select Code to Download

use DBI;
use Sprog::PrintProxy;
...
           or die "$!:  Can't connect to DB";

my $fh = Sprog::PrintProxy->new( DBPrinter->new($dbh, "/some/directory
+", "outfile.txt", "dblinkname") );

# ====================================================================
+========
#  DBPrinter
...
1;