diff -r a3860111db49 -r 3db363880766 sbin/zone-rm --- a/sbin/zone-rm Thu Jun 30 15:19:33 2011 +0200 +++ b/sbin/zone-rm Thu Jun 30 16:24:32 2011 +0200 @@ -22,11 +22,12 @@ "h|help" => sub { pod2usage(-exit => 0, -verbose => 1) }, "m|man" => sub { pod2usage( - -exit => 0, - -verbose => 2, - # "system('perldoc -V &>/dev/null')" appears shorter, but may not - # do what you expect ( it still returns 0 on debian squeeze with - # dash as system shell even if cannot find the command in $PATH) + -exit => 0, + -verbose => 2, + + # "system('perldoc -V &>/dev/null')" appears shorter, but may not + # do what you expect ( it still returns 0 on debian squeeze with + # dash as system shell even if cannot find the command in $PATH) -noperldoc => system('perldoc -V >/dev/null 2>&1') ); },