+dump_fastmarc.pl - display MARC records
+
+=head2 USAGE
+
+ dump_fastmarc.pl /path/to/dump.marc
+
+=head2 OPTIONS
+
+=over 16
+
+=item -o offset
+
+dump records starting with C<offset>
+
+=item -l limit
+
+dump just C<limit> records
+
+=item -h
+
+dump result of C<to_hash> on record
+
+=item -d
+
+turn debugging output on
+
+=item -t
+
+dump tsv file for TokyoCabinet import
+
+=back
+
+=cut
+
+my %opt;
+getopts('do:l:ht', \%opt);
+
+my $file = shift @ARGV || die "usage: $0 [-o offset] [-l limit] [-h] [-d] file.marc\n";