Re: A quick Getopt::Long question

my $strip = 0;
GetOptions(striphtml => \$strip);
if ($strip) {striphtml()} else {main()}
[download]

Or.

my $strip = 0;
GetOptions(striphtml => sub {striphtml(); $strip = 1})
main() unless $strip;
[download]

Comment on Re: A quick Getopt::Long question Select or Download Code

Replies are listed 'Best First'.
Re^2: A quick Getopt::Long question by chinamox (Scribe) on Nov 22, 2006 at 16:08 UTC
I thank you for your help, oh nameless one. Both of these seem to do the trick fine. -mox	[reply]