in reply to Bitwise & not working correctly in CGI script

print "19 & 16 = ", (19 & 16), "\n";
print "'19' & '16' = ", ('19' & '16'), "\n";
print "'19' & 16 = ", ('19' & 16), "\n";
print "19 & '16' = ", (19 & '16'), "\n";

[download]

The thing is that Perl did not convert the string (keys of a hash are ALWAYS strings, even if you used numeric literals when filling it in.) to a number and instead it evaluated a bitwise AND on the characters of the strings.

Jenda
Enoch was right!
Enjoy the last years of Rome.

Replies are listed 'Best First'.
Re^2: Bitwise & not working correctly in CGI script
by Anonymous Monk on Jun 14, 2012 at 06:28 UTC

    What Jenda is trying to say, what perlnumber (and kennethk ) say, is that you should numify one of your arguments, so write 

    #~ if( 0+$flag & $job_type ){
#~ if( $flag & 0+$job_type ){
#~ if( 0+$flag & 0+$job_type ){
if( int $flag & int $job_type ){
    $bu = $bj{$flag} ;
    cluck("business_unit: $bu");
}

    [download]
[reply]
[d/l]
Re^2: Bitwise & not working correctly in CGI script
by solegaonkar (Beadle) on Jun 15, 2012 at 08:28 UTC
    Wow! That was right! The problem got solved when I numified both operands of & by adding 0. Thanks for your help!!
[reply]

In Section Seekers of Perl Wisdom