Select Code to Download

use Net::MySQL;
my $dbh = Net::MySQL->new(
...
   #unlink $filename;
   #}
}

======================================================================
+=============:
Use INET Socket: atl-perl-dev 3306/tcp
...
Query Result:

C:\WINNT\Profiles\#netbackup\My Documents\scripts>