hi to all,

(and a very good new year's eve). someone can tell me why this script doesn't accept the -h flag?:

#!/usr/bin/perl -w

use strict;
use warnings;
use Getopt::Std;

getopt('h');
my $opt_h;
if($opt_h)
        {
[code...]
        }


[rest of the script...]


thnak you a lot,


alladr



|^|_|^|_|^|                              |^|_|^|_|^|    
 |            |                                 |            |
 |            |                                 |            |
 |            |*\_/*\_/*\_/*\_/*\_/* |            |
 |                                                           |
 |                                                           |
 |                                                           |
 |         http://www.e-allora.net        |
 |                                                           |
 |                                                           |
**************************************


--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to