http://www.perlmonks.org?node_id=1069499


in reply to Re^2: Not getting desire output by using switch statement in Perl
in thread Not getting desire output by using switch statement in Perl

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

[download]
لսႽ† ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ

In Section Seekers of Perl Wisdom