RE: Perl script to verify DB is up.

No it doesn't, it only tells you that you can't log into the database.

Jared

On Thu, 22 Jun 2000, Shreter, Hilary wrote:

> Just a thought: Is there any reason to have a "successful" logon ?
> When we test installs of Discoverer (for example), we tell the installers
> to use test/test_at_goodsid. The fact that I get back "bad account" says that
> the database is up.
> (Sometimes, "the best" is the enemy of "the good")
>
> -----Original Message-----
> Sent: Wednesday, June 21, 2000 10:54 PM
> To: Multiple recipients of list ORACLE-L
>
>
>
> >
> >It's not too difficult to modify the script to ask for the
> >password, but *geez*, do I have to do it *all*?
> >
>
> yes, of course you do :)
>
>
> Rachel
>
>
> >;)
> >
> >Jared
> >
> >On Wed, 21 Jun 2000, Rachel Carmichael wrote:
> >
> > > Jared,
> > >
> > > Um, you mean you have to include the PASSWORD on the command line???????
> > >
> > > Rachel
> > >
> > >
> > > >From: Jared Still <jkstill_at_bcbso.com>
> > > >Reply-To: ORACLE-L_at_fatcity.com
> > > >To: Multiple recipients of list ORACLE-L <ORACLE-L_at_fatcity.com>
> > > >Subject: Re: Perl script to verify DB is up.
> > > >Date: Wed, 21 Jun 2000 09:44:00 -0800
> > > >
> > > >On Wed, 21 Jun 2000, Mabry, Jennifer wrote:
> > > >
> > > > > Hello all,
> > > > >
> > > > > I and my group are pretty new DBA's and have a question for you all.
> > > > >
> > > > > Do any of you have a UNIX Perl script that monitors each of your
> > > >instances
> > > > > to verify the DB is up? If not, pages you?
> > > > >
> > > >
> > > >Here's a basic connect script.
> > > >
> > > >The paging would be fairly easy to add by
> > > >using a Perl Sendmail module.
> > > >
> > > >
> > > >Jared Still
> > > >Certified Oracle DBA and Part Time Perl Evangelist ;-)
> > > >Regence BlueCross BlueShield of Oregon
> > > >jkstill_at_bcbso.com - Work - preferred address
> > > >jkstill_at_teleport.com - private
> > > >
> > > >--------------
> > > >
> > > >#!/usr/bin/perl
> > > >
> > > >use DBI;
> > > >use strict;
> > > >no strict 'vars';
> > > >
> > > >use Getopt::Long;
> > > >
> > > >my %optctl = ();
> > > >
> > > >Getopt::Long::GetOptions(\%optctl,
> > > >"database:s","username:s","password:s","z","h","help");
> > > >
> > > >#setup environment - homegrown package
> > > >
> > > >my($db, $username, $password);
> > > >
> > > >if ( ! defined($optctl{database}) ) {
> > > > Usage();
> > > > die "database required\n";
> > > >}
> > > >$db=$optctl{database};
> > > >
> > > >if ( ! defined($optctl{username}) ) {
> > > > Usage();
> > > > die "username required\n";
> > > >}
> > > >$username=$optctl{username};
> > > >
> > > >if ( ! defined($optctl{password}) ) {
> > > > Usage();
> > > > die "password required\n";
> > > >}
> > > >$password=$optctl{password};
> > > >
> > > >#print "USERNAME: $username\n";
> > > >#print "DATABASE: $db\n";
> > > >#print "PASSWORD: $password\n";
> > > >#exit;
> > > >
> > > ># setup your Oracle environment before running this
> > > ># or ( less optimal ) set it up here
> > > ># $ENV{ORACLE_SID}='my_sid';
> > > ># $ENV{ORACLE_HOME}='/obase/product/8.1.5';
> > > ># $ENV{TNS_ADMIN}='/obase/product/8.1.5/network/admin/';
> > > >
> > > >$dbh = DBI->connect('dbi:Oracle:' . $db, $username, $password, {
> >RaiseError
> > > >=> 1, AutoCommit => 0 } );
> > > >
> > > >die "Connect to $db failed \n" unless $dbh;
> > > >
> > > >$MySql="select \* from dual";
> > > >
> > > >$sth = $dbh->prepare($MySql);
> > > >
> > > >my $rv = $sth->execute;
> > > >
> > > >while( $ary = $sth->fetchrow_arrayref ) {
> > > > print "\t\t$${ary[0]}\n";
> > > >}
> > > >
> > > >$sth->finish;
> > > >$dbh->disconnect;
> > > >
> > > >sub Usage {
> > > > print "\n";
> > > > print "usage: connect.pl\n";
> > > > print " connect.pl -database dv07 -username scott -password
> >tiger\n";
> > > > print "\n";
> > > >}
> > > >
> > > >
> > > >
> > > >
> > > >--
> > > >Author: Jared Still
> > > > INET: jkstill_at_bcbso.com
> > > >
> > > >Fat City Network Services -- (858) 538-5051 FAX: (858) 538-5051
> > > >San Diego, California -- Public Internet access / Mailing Lists
> > > >--------------------------------------------------------------------
> > > >To REMOVE yourself from this mailing list, send an E-Mail message
> > > >to: ListGuru_at_fatcity.com (note EXACT spelling of 'ListGuru') and in
> > > >the message BODY, include a line containing: UNSUB ORACLE-L
> > > >(or the name of mailing list you want to be removed from). You may
> > > >also send the HELP command for other information (like subscribing).
> > >
> > > ________________________________________________________________________
> > > Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com
> > >
> > > --
> > > Author: Rachel Carmichael
> > > INET: carmichr_at_hotmail.com
> > >
> > > Fat City Network Services -- (858) 538-5051 FAX: (858) 538-5051
> > > San Diego, California -- Public Internet access / Mailing Lists
> > > --------------------------------------------------------------------
> > > To REMOVE yourself from this mailing list, send an E-Mail message
> > > to: ListGuru_at_fatcity.com (note EXACT spelling of 'ListGuru') and in
> > > the message BODY, include a line containing: UNSUB ORACLE-L
> > > (or the name of mailing list you want to be removed from). You may
> > > also send the HELP command for other information (like subscribing).
> > >
> >
> >
> >Jared Still
> >Certified Oracle DBA and Part Time Perl Evangelist ;-)
> >Regence BlueCross BlueShield of Oregon
> >jkstill_at_bcbso.com - Work - preferred address
> >jkstill_at_teleport.com - private
> >
> >
>
> ________________________________________________________________________
> Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com
>
> --
> Author: Rachel Carmichael
> INET: carmichr_at_hotmail.com
>
> Fat City Network Services -- (858) 538-5051 FAX: (858) 538-5051
> San Diego, California -- Public Internet access / Mailing Lists
> --------------------------------------------------------------------
> To REMOVE yourself from this mailing list, send an E-Mail message
> to: ListGuru_at_fatcity.com (note EXACT spelling of 'ListGuru') and in
> the message BODY, include a line containing: UNSUB ORACLE-L
> (or the name of mailing list you want to be removed from). You may
> also send the HELP command for other information (like subscribing).
> --
> Author: Shreter, Hilary
> INET: ShreterH_at_orau.gov
>
> Fat City Network Services -- (858) 538-5051 FAX: (858) 538-5051
> San Diego, California -- Public Internet access / Mailing Lists
> --------------------------------------------------------------------
> To REMOVE yourself from this mailing list, send an E-Mail message
> to: ListGuru_at_fatcity.com (note EXACT spelling of 'ListGuru') and in
> the message BODY, include a line containing: UNSUB ORACLE-L
> (or the name of mailing list you want to be removed from). You may
> also send the HELP command for other information (like subscribing).
Received on Thu Jun 22 2000 - 19:45:17 CDT