Help for this page

Select Code to Download

Select or download this

### Our DBI parameters are:
$dsn="dbi:Sybase:server=$DB_SERVER";
### Connect DB
$dbh = DBI->connect ($dsn, $DB_USER, $DB_PWD) ;

Select or download this

sub process_database {

...
         print "IN DATABASE $_ \n";
    } ## end of while
}