#!/usr/local/bin/perl -w

# NOTE --- NEED /usr/local/bin/perl, NOT /usr/bin/perl, on sorrel 
# for this to work!!!!! 

# so, we may be using these modules:
use DBI;
use CGI qw/ :standard /;

# set necessary environment variables
# ... this is sorrel's: 
$ENV{'ORACLE_HOME'} = '/apps1/oracle/product/9iAS/';


# ...and so is this:
$ENV{'LD_LIBRARY_PATH'} = '/apps1/oracle/product/9iAS/lib';

my $db_handle = DBI->connect('Student', 'perlplay', 'perlplay', 'Oracle')
    || die "Database connection not made: $DBI::errstr";

$db_handle->disconnect;

# end of dbi1