> use strict;
> sub Main {
> $dbh = DBI->connect('dbi:Oracle:', 'john/wayne@western','');
> }
> So where is the problem?When you use "use strict" you need to declare your variables or give them full names: a) leave out "use strict" (not recommended) b) my $dbh = DBI->... c) $main::dbh = DBI->... Good bye, Uwe
