Parent Directory | Revision Log | Patch
revision 20 by dpavlin, Thu Dec 13 11:38:36 2007 UTC | revision 21 by dpavlin, Thu Dec 13 11:39:52 2007 UTC | |
---|---|---|
# | Line 12 use HTTP::Date; | Line 12 use HTTP::Date; |
12 | use POSIX qw/strftime/; | use POSIX qw/strftime/; |
13 | use File::Slurp; | use File::Slurp; |
14 | use File::MMagic::XS; | use File::MMagic::XS; |
15 | use Getopt::Long; | |
16 | use Data::Dump qw/dump/; | use Data::Dump qw/dump/; |
17 | ||
18 | my $debug = 0; | my $debug = 0; |
19 | my $max = 999; | my $max = 999; |
20 | ||
21 | GetOptions( | |
22 | 'debug+' => \$debug, | |
23 | 'max=i' => \$max, | |
24 | ); | |
25 | ||
26 | my $page; | my $page; |
27 | my $page_date; | my $page_date; |
28 |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |