in reply to simple hash question

you're trying to match a hash again the number 1, yes? (rather than use the 1 as part of the ref).

try this...

if (%hash->{$base}->{'Initialized'} !~ /1/) {

or

if (%hash->{$base}->{'Initialized'} !~ /"1"/) {

about strict:
if i'm not mistaken, most values need to be in quotes, while strict is in place

Replies are listed 'Best First'.
Re: Re: simple hash question
by PodMaster (Abbot) on May 27, 2004 at 04:28 UTC 
    use strict;
my $hash = { Foo => 1 };
if( $hash->{Foo}->{EEEEEEEK} cmp "abcdefghijklmnopqrstuvwxyz" ){
}
__END__
Can't use string ("1") as a HASH ref while "strict refs" in use at ...
+.

    [download]
    about strict: if i'm not mistaken, most values need to be in quotes, while strict is in place
    You are mistaken. If you want to know what strict is for read `perldoc strict'. If you want to know about quoting hash keys, start with `perldoc perldata'.

    MJD says "you can't just make shit up and expect the computer to know what you mean, retardo!"
    I run a Win32 PPM repository for perl 5.6.x and 5.8.x -- I take requests (README).
    ** The third rule of perl club is a statement of fact: pod is sexy.

[reply]
[d/l]

      i meant unquoted strings and not values, while strict was in place.

      As i reread the question, this probably wasn't necessary in this case, as it appears to be more of a mathematical - rather than string - comparison.

      my apologies...

[reply]
Re: Re: simple hash question
by davido (Cardinal) on May 27, 2004 at 04:29 UTC
    If his datastructure contains a 1 (a numeric value), there's no reason to resort to using the regexp comparisons. And there's no need to wrap the 1 in quotes.

    You're barking up the wrong tree with those suggestions.

    It is perfectly legit to say:

    if ( $item != 1) {....

    And a properly accessed hash element is not an exception to this rule.


    Dave

[reply]
[d/l]

In Section Seekers of Perl Wisdom