Re: Problem connecting to Oracle w/ DBI-1.21

[lembark]

Now it gets real odd. Only change in the loop was from
"for( qw(...) )" to "for my $foo ( qw(...) )" and using
"$foo" in  the quoted string rahter than $_:


This fails:

                        for ( qw(PROD01 PROD02 PROD03 PROD04) )
                        {
                                my @a = ("dbi:Oracle:host=dsstransform;sid=$_",'','');

                                my $dbh = DBI->connect(@a);

                                print "$$: Test connection to Oracle:", Dumper $dbh;
                        }

This works:


                        for my $foo ( qw(PROD01 PROD02 PROD03 PROD04) )
                        {
                                my @a = 
("dbi:Oracle:host=dsstransform;sid=$foo",'','');

                                my $dbh = DBI->connect(@a);

                                print "$$: Test connection to Oracle:", Dumper $dbh;
                        }




--
Steven Lembark                              2930 W. Palmer
Workhorse Computing                      Chicago, IL 60647
                                           +1 800 762 1582