安装Sybase ASE For Linux

3 基本编程范例:

#!/usr/bin/perl
use DBI;

my $server = "sybase";

my $dbh = DBI->connect('dbi:Sybase:','sa','',{syb_dbd_server=>$server});
my $sth = $dbh->prepare("sp_help");
$sth->execute();
my $text;

while(($text) = $sth->fetchrow)
{
print $text."n";
}
exit(0);