equal
deleted
inserted
replaced
36 |
36 |
37 MAIN: { |
37 MAIN: { |
38 |
38 |
39 GetOptions( |
39 GetOptions( |
40 "sign-alert-time=i" => \$opt{sign_alert_time}, |
40 "sign-alert-time=i" => \$opt{sign_alert_time}, |
41 "key-counter-end=i" => \$opt{key_counter_end}, |
41 "key-counter-end=i" => \$opt{key_counter_end}, |
42 "h|help" => sub { pod2usage(-exit 0, -verbose => 1) }, |
42 "h|help" => sub { pod2usage(-exit 0, -verbose => 1) }, |
43 "m|man" => sub { |
43 "m|man" => sub { |
44 pod2usage( |
44 pod2usage( |
45 -exit 0, |
45 -exit 0, |
46 -verbose => 2, |
46 -verbose => 2, |