Johan Vromans wrote: > [Quoting Wolfgang Laun, on March 17 2000, 07:36, in "Re: [ID 20000316.015"] > > GetOptions (\%options, 'alt|a', 'color|c', 'help|h', 'indent|i=i', > > 'loose|l', 'sentence|s', 'termcap!', 't', 'width|w=i') or exit > > 1; > > $options{termcap} ||= $options{t}; > > > > (It would not handle pod2text -t --notermcap in the usual way but it might > > not be worth the extra effort of covering that, too.) > > GetOptions (\%options, 'alt|a', 'color|c', 'help|h', 'indent|i=i', > 'loose|l', 'sentence|s', 'termcap!', > 't' => $options{termcap}, 'width|w=i') or exit 1; > ... 't' => \$options{termcap},... Cute. -W > > -- JohanThread Previous | Thread Next