bin/zone-ls
changeset 113 30bd047cd057
parent 95 cb92affcf59f
--- a/bin/zone-ls	Tue May 24 09:40:39 2011 +0200
+++ b/bin/zone-ls	Tue May 24 11:05:33 2011 +0200
@@ -23,7 +23,10 @@
             pod2usage(
                 -exit      => 0,
                 -verbose   => 2,
-                -noperldoc => system("perldoc -V &>/dev/null")
+                # "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')
             );
         },
     ) or pod2usage;