Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer

Re^2: Bug : eval and accent

by sylvanus_monachus (Novice)
on Nov 16, 2007 at 13:39 UTC ( #651195=note: print w/replies, xml ) Need Help??

in reply to Re: Bug : eval and accent
in thread Bug : eval and accent

The bug is not "accent in variable" The bug is that in second eval the perl lexer can't parse normal variable anymore...Eval is useful to execute buggy code ... that's why i use it, because the code comes from user and he can always put "Unrecognized character"

And your are rigth , the way to solve the bug "accent in variable" is this way :

use Unicode::String; my $code1='my $var_with__accent=5;print "var is $var_with__accent";' +; $code1="use utf8;$code1"; $code1=Unicode::String::latin1($code1)->utf8; print "\nEval buggy code\n"; eval "$code1"; print "ERR = $@" if ($@);; print "DONE\n"; my $string; my $code2='$string="new eval done";'; print "\nEval good code\n"; eval $code2; print "ERR = $@" if ($@); print "string is : $string\n"; print "DONE\n";

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://651195]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (5)
As of 2021-01-19 09:33 GMT
Find Nodes?
    Voting Booth?