Select Code to Download

myserver
   query tcp tds4.2 10.0.2.1 1433

$ENV{'SYBASE'} = "/freetds" unless $ENV{'SYBASE'};
my $dbh;
 $dbh = DBI->connect("dbi:Sybase:server=myserver",userid,password);