Changeset 29253

Timestamp:

Sep 28, 2010, 12:04:59 PM (16 years ago)

Author:

heather

Message:

made checkexp more awesome - --dbname works for isp and by default uses gpc1

File:

• trunk/tools/checkexp (modified) (2 diffs)

trunk/tools/checkexp

@@ -20 +20 @@
 my $endDate;
 my $verbose;
-my $dbname = "gpc1";
+my $dbname;
 
 GetOptions(
@@ -33 +33 @@
 #           -exitval => 3)
 #    unless defined $startDate;
+
+if (!$dbname) {
+    my $dbname = "gpc1";
+}
 
 my $dbh  = getDBHandle($ipprc, $dbname);