Changeset 15548

Timestamp:

Nov 9, 2007, 2:40:08 PM (19 years ago)

Author:

jhoblitt

Message:

remove --file option

File:

• trunk/PS-IPP-Metadata-Config/scripts/mdc-dump (modified) (4 diffs)

trunk/PS-IPP-Metadata-Config/scripts/mdc-dump

@@ -3 +3 @@
 # Copyright (C) 2005  Joshua Hoblitt
 #
-# $Id: mdc-dump,v 1.2 2006-01-21 02:38:17 jhoblitt Exp $
+# $Id: mdc-dump,v 1.3 2007-11-10 00:40:08 jhoblitt Exp $
 
 use strict;
@@ -19 +19 @@
 my ( $file, $overwrite, $verbose );
 GetOptions(
-    'file=s'    => \$file,
     'overwrite' => \$overwrite,
     'verbose'   => \$verbose,
 ) || pod2usage( 2 );
+
+$file = shift;
 
 pod2usage( -msg => "Unknown option: @ARGV", -exitval => 2 ) if @ARGV;
@@ -64 +65 @@
 =head1 SYNOPSIS
 
-    mddump.pl [--overwrite] [--verbose] --file <filename>
+    mddump.pl [--overwrite] [--verbose] <filename>
 
     or
@@ -83 +84 @@
 =over 4
 
-=item * --file <filename> | -f <filename>
+=item * <filename>
 
 Accepts the name of a file to use as input.  If this option is omitted the