--- a/update-serial.pl	Fri Nov 05 10:05:08 2010 +0100
+++ b/update-serial.pl	Fri Nov 05 16:16:13 2010 +0100
@@ -16,6 +16,7 @@
 
 use strict;
 use warnings;
+use 5.010;
 
 use File::Copy;
 use File::Basename;
@@ -53,7 +54,7 @@
         "y|r|yes|reload!" => \$opt_reload,
         "dnssec!"     => \$opt_dnssec,
 		"h|help"	  => sub { pod2usage(-exit => 0, -verbose => 1) },
-		"m|man"		  => sub { pod2usage(-exit => 0, -verbose => 2) },
+		"m|man"		  => sub { pod2usage(-noperldoc => system(perldoc => "-V"), -exit => 0, -verbose => 2) },
 		"version"     => sub { print "$0 $VERSION\n"; exit 0; },
     ) or pod2usage();