X-Git-Url: http://git.ozo.com/?a=blobdiff_plain;f=tools%2Fmissing-macros%2Fsrc%2Fbin%2Fhelp2man;fp=tools%2Fmissing-macros%2Fsrc%2Fbin%2Fhelp2man;h=6cbec57c50f48a8373a7ad7a61a0e8ed7ba77fd0;hb=6dec519be7a9814d6c93aa8cfb9bcb025708b1b1;hp=0000000000000000000000000000000000000000;hpb=1070fec51f88b8d053ac1104cc17a9d744d112a7;p=openwrt%2F.git diff --git a/tools/missing-macros/src/bin/help2man b/tools/missing-macros/src/bin/help2man new file mode 100755 index 0000000000..6cbec57c50 --- /dev/null +++ b/tools/missing-macros/src/bin/help2man @@ -0,0 +1,29 @@ +#!/usr/bin/env perl + +use strict; +use Getopt::Long; + +my $output; +my $version; + +Getopt::Long::Configure('pass_through'); +Getopt::Long::GetOptions( + 'output=s' => \$output, + 'version' => \$version +); + +if ($version) +{ + printf "OpenWrt help2man 1.40.10\n"; + exit 0; +} +elsif ($output) +{ + open O, "> $output" || die "Unable to open $output: $!\n"; + print O "Dummy man page.\n"; + close O; +} +else +{ + print O "Dummy man page.\n"; +}