hi,
A bareword test :
---------------------------------
use utf8;
my %hash = (тест => 123);
if (($hash{тест}) eq
($hash{'тест'})) print "ok\n";
----------------------------------
The chars in the hash are \x{0442}, \x{0435}, \x{0441}
and \x{0442}.
On ebcdic, the chars (barewords) are not displayed.
On ebcdic, can I write :
my %hash = ("\x{0442}\x{0435}\x{0441}\x{0442}" => 123)
if (($hash{"\x{0442}\x{0435}\x{0441}\x{0442}"}) eq
($hash{eval '"\x{0442}\x{0435}\x{0441}\x{0442}"'}))
print "ok\n";
I use eval since the single quote outside a double
quote isnt recognised as is.
1) Is the above allowed ?
2) Is there a different way to do the bareword test ?
Thanks in advance,
Rajarshi.
____________________________________________________
Yahoo! Sports
Rekindle the Rivalries. Sign up for Fantasy Football
http://football.fantasysports.yahoo.com