Index: trunk/PS-IPP-Metadata-Config/scripts/mdc-dump
===================================================================
--- trunk/PS-IPP-Metadata-Config/scripts/mdc-dump	(revision 5201)
+++ trunk/PS-IPP-Metadata-Config/scripts/mdc-dump	(revision 6097)
@@ -3,5 +3,5 @@
 # Copyright (C) 2005  Joshua Hoblitt
 #
-# $Id: mdc-dump,v 1.1 2005-09-30 01:32:02 jhoblitt Exp $
+# $Id: mdc-dump,v 1.2 2006-01-21 02:38:17 jhoblitt Exp $
 
 use strict;
@@ -17,8 +17,9 @@
 use Pod::Usage qw( pod2usage );
 
-my ( $file, $overwrite );
+my ( $file, $overwrite, $verbose );
 GetOptions(
     'file=s'    => \$file,
     'overwrite' => \$overwrite,
+    'verbose'   => \$verbose,
 ) || pod2usage( 2 );
 
@@ -28,4 +29,8 @@
 $file = '-' unless $file;
 
+if (defined $verbose) {
+    $::RD_TRACE = 1;
+    $::RD_HINT = 1;
+}
 my $md_parser = PS::IPP::Metadata::Config->new;
 
@@ -59,9 +64,9 @@
 =head1 SYNOPSIS
 
-    mddump.pl [--overwrite] --file <filename>
+    mddump.pl [--overwrite] [--verbose] --file <filename>
 
     or
 
-    cat <filename> | mddump.pl [--overwrite]
+    cat <filename> | mddump.pl [--overwrite] [--verbose]
 
     or
@@ -87,4 +92,9 @@
 A flag that turns L<PS::IPP::Metadata::Config>'s overwrite behavior on.
 Overwrite is always off unless this flag is specified.
+
+=item * --verbose | -v
+
+A flag that turns L<Parse::RecDescent>'s C<RD_TRACE> and C<RD_HINT> tracing
+flags.  verbose is always off unless this flag is specified.
 
 =item * --help | -h | -?