use Getopt::Long;
use Pod::Usage;
GetOptions(
) or pod2usage({verbose => 1, exitval => 1});
=head1 SYNOPSIS
Switch a right-handed widget to the left.
% switchlr widget [--verbose]
=head1 ARGUMENTS
widget the widget to switch
=head1 OPTIONS
--verbose be verbose about it
is nifty. Really nifty.
Something like that (Score:4, Informative)
Have you seen ybiC's tutorial [perlmonks.org] in the monastery? It's a similar idiom and some extensions.
Reply to This
Re:Something like that (Score:1)