Index: trunk/Nebulous-Server/bin/neb-admin
===================================================================
--- trunk/Nebulous-Server/bin/neb-admin	(revision 18416)
+++ trunk/Nebulous-Server/bin/neb-admin	(revision 18457)
@@ -3,5 +3,5 @@
 # Copyright (C) 2005-2008  Joshua Hoblitt
 #
-# $Id: neb-admin,v 1.7 2008-07-02 23:20:38 jhoblitt Exp $
+# $Id: neb-admin,v 1.8 2008-07-10 02:40:33 jhoblitt Exp $
 
 use strict;
@@ -19,5 +19,5 @@
 use Pod::Usage qw( pod2usage );
 
-my ($db, $dbhost, $dbuser, $dbpass, $pending, $limit);
+my ($db, $dbhost, $dbuser, $dbpass, $pending, $limit, $verbose);
 
 $db     = $ENV{'NEB_DB'};
@@ -33,4 +33,5 @@
     'pendingreplicate|r'    => \$pending,
     'limit|l=i'             => \$limit,
+    'verbose|v'             => \$verbose,
 ) || pod2usage( 2 );
 
@@ -76,6 +77,9 @@
 
 foreach my $obj (@rows) {
-#    use Data::Dumper;
-#    print Dumper($obj);
+    if (defined $verbose) {
+        require Data::Dumper;
+        print Data::Dumper::Dumper($obj);
+    }
+
     my $so_id = $obj->{so_id};
     my $key = $obj->{ext_id};