9 Getopt
::Long
::Configure
('pass_through');
10 Getopt
::Long
::GetOptions
(
11 'output=s' => \
$output,
12 'version' => \
$version
17 printf "OpenWrt help2man 1.40.10\n";
22 open O
, "> $output" || die "Unable to open $output: $!\n";
23 print O
"Dummy man page.\n";
28 print O
"Dummy man page.\n";