make verbose output a command line switch

This commit is contained in:
myk%mozilla.org 2004-06-29 23:00:09 +00:00
Родитель 45c2d92ce0
Коммит f235349be1
1 изменённых файлов: 4 добавлений и 0 удалений

Просмотреть файл

@ -7,6 +7,10 @@ use strict;
my $VERBOSE = 1;
use Getopt::Long;
my $VERBOSE = 0;
GetOptions("verbose" => \$VERBOSE);
# Establish a database connection.
my $dsn = "DBI:mysql:host=mecha.mozilla.org;database=downloadstats;port=3306";
my $dbh = DBI->connect($dsn,