Re: Not getting desire output by using switch statement in Perl

[choroba]

Your condition is not doing what you think:

perl -MO=Deparse,-p -e '$a eq "a" || "b" || "c" || "d"'
(((($a eq 'a') or 'b') or 'c') or '???');

[rammohan]

Then how I'm achieve that result?(me question is if I give a string then it returns output result with numeric values like based on alphabetic value in numeric type- a is 1, b is 2,c is 3 in this similar way up to..... z is 26 )

[choroba]

Easy. See ord:

if ($a =~ /[a-z]/) {
    print ord($a) - 96;
} else {
    print "Everything else";
}