| branch | rsync |
| changeset 33 | 2b9fc0919b0f |
| parent 28 | 8efaf6179ee8 |
| child 34 | da128a0b985f |
| 32:67a8cdb90885 | 33:2b9fc0919b0f |
|---|---|
17 my %opt = ( |
17 my %opt = ( |
18 'run-lintian' => 1, |
18 'run-lintian' => 1, |
19 ); |
19 ); |
20 |
20 |
21 GetOptions( |
21 GetOptions( |
22 "l|run-lintian" => \$opt{run-lintian}, |
22 "l|run-lintian" => \$opt{'run-lintian'}, |
23 "h|help" => sub { pod2usage(-exit => 0, -verbose => 1) }, |
23 "h|help" => sub { pod2usage(-exit => 0, -verbose => 1) }, |
24 "m|man" => sub { |
24 "m|man" => sub { |
25 pod2usage( |
25 pod2usage( |
26 -exit => 0, |
26 -exit => 0, |
27 -verbose => 2, |
27 -verbose => 2, |