Index: trunk/DataStoreServer/scripts/dsreg
===================================================================
--- trunk/DataStoreServer/scripts/dsreg	(revision 29575)
+++ trunk/DataStoreServer/scripts/dsreg	(revision 29743)
@@ -9,4 +9,5 @@
 use Getopt::Long qw( GetOptions );
 use Pod::Usage qw( pod2usage );
+use Carp;
 use Digest::MD5::File qw( file_md5_hex );
 use DBI;