use DBI; use strict; my $DNS = shift; my $dbh = DBI->connect($DNS); #### $ /your_path_to_it/pltags.pl test_DBI.pl `perldoc -l DBI`