Fixed with José Pedro Silva Pinto comments.
Thanks
Lorenzo
On 12/7/05, Dan Klose <[EMAIL PROTECTED]> wrote:
>
> On Wed, 2005-12-07 at 12:50 +0200, Lorenzo Caggioni wrote:
> > HI!!!
> Hi
> > i'm tring to use DBI module
> >
> > Here is the code
> >
> > #!/geneva/geneva/dev1/perl5/bin/perl
> > #
> >
> > use strict;
> > use DBI;
> > use warnings;
> >
> > my $dbh = DBI->connect( 'dbi:Oracle:MYSEED,
> > 'donald',
> > 'duck',
> > {
> > RaiseError => 1,
> > AutoCommit => 0
> > }
> > ) or print "Database connection not made:
> $DBI::errstr
> > \n";
> >
> > print " \n THE END \n \n";
> >
> > If the username and password is correct it works fine, but if they are
> > incorrect the program doesn't print the error message and it die...
> >
> Can't you just change the 'or print' to the 'or die'?
>
>
> > What's wrong?
> >
> > Thanks
> >
> > Lorenzo
>
>
