Gustl: DynamicVariablen in Perl interpretieren, ähnlich JS eval?

Beitrag lesen

lösung:

my @R3 = ("hund","katz","maus");  
  
my $i = 3;  
  
my $gans = eval"\${R".$i."[1]}";

print"$gans"; gibt "katz" aus

ich hatte nur $ nicht maskiert. wieso? keine ahnung, in jedem "normalen" string hätt ich es automatisch getan.

wieso sagt mir das keiner :-)

das ist meine originalzeile. das war alles.

if (substr($arr_e[$r],$i,1) == 0) { $neu_e = $neu_e.eval"\${R".$wa_e."_e[0]}"; }

  • Gustl