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");
|