Help for this page
#!/usr/bin/perl ... print "\t$column\n"; } }
#!/usr/bin/perl ... } $dbh->disconnect();