Select Code to Download

sub sa_details {
   my $dbh = shift;
   my @uids;
...
        "host",
    )
);

sub sa_details {
    my $dbh = shift;
...

$DB_ERROR and die $DB_ERROR;
## $Sybase::DBlib::DB_ERROR and die $Sybase::DBlib::DB_ERROR;