Select Code to Download

my $dbh = DBI->connect('DBI:stack_of_papers_on_my_desk', 'user', 'pw')
    or die DBI::errstr;