Re: Use of uninitialized value in numeric eq (==)

[Chas. Owens]

On Dec 11, 2007 7:53 PM, protoplasm <[EMAIL PROTECTED]> wrote:
snip
> my $opts_hash;
> my %opts_hash = ();
snip

You don't need $opts_hash (you aren't using it).  You can get rid of
the undef warnings by making sure that the keys in %opts_hash are used
like this:

#default values for the options
my %opts_hash = (
        CbcDec => 0,
        CbcEnc => 0,
        CfbDec => 0,
);

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