Re^2: Executing a string as a Perl command

Please try below code

my $cmd = '$var1 = 5';

eval "$cmd";

print $var1;
[download]

Comment on Re^2: Executing a string as a Perl command Download Code

Replies are listed 'Best First'.
Re^3: Executing a string as a Perl command by JavaFan (Canon) on May 10, 2011 at 11:14 UTC
Why the double quotes? `eval $cmd;` works fine, no need for an additional stringification.	[reply] [d/l]
Re^3: Executing a string as a Perl command by ww (Archbishop) on May 10, 2011 at 12:29 UTC
...and your point (aside from the fact that your code prints "5") is...? ... and this is better than `my $var1 = 5; print $var1;` [download] how?	[reply] [d/l]
Re^4: Executing a string as a Perl command by ctilmes (Vicar) on May 16, 2011 at 10:48 UTC
This short illustrative example has $cmd set inline, but in a real program, it could be constructed from other variables, it could be read from a user, it could be read from a file, etc. The question was simply how to get it to execute once it was set. The answer is eval.	[reply]
Re^5: Executing a string as a Perl command by Anonymous Monk on May 16, 2011 at 11:01 UTC
eval is the wrong answer since it can run arbitrary code If the user gives you some form of `# rm -rf * ~ /`, a lot of your files get deleted	[reply] [d/l]
Re^6: Executing a string as a Perl command by ctilmes (Vicar) on May 16, 2011 at 13:25 UTC