- or download this
my $strFraction = eval "1/2";
print "strFraction is actually $strFraction <br>";
- or download this
my $strFraction = eval qq|print "this could have been `rm *` - bye bye
+ files!\n"|;
print "strFraction is actually $strFraction <br>";
- or download this
this could have been `rm *` - bye bye files!
strFraction is actually 1 <br>