--- tamtam/tamtam2socialtext.pl 2007/12/13 11:38:36 20 +++ tamtam/tamtam2socialtext.pl 2007/12/13 11:39:52 21 @@ -12,11 +12,17 @@ use POSIX qw/strftime/; use File::Slurp; use File::MMagic::XS; +use Getopt::Long; use Data::Dump qw/dump/; my $debug = 0; my $max = 999; +GetOptions( + 'debug+' => \$debug, + 'max=i' => \$max, +); + my $page; my $page_date;