5 lines
129 B
Perl
5 lines
129 B
Perl
#!/usr/local/bin/perl
|
|
|
|
$myvar = 1;
|
|
eval ("print (\"hi!\\n\"); \$myvar = 2;");
|
|
print ("the value of \$myvar is $myvar\n"); |