Select Code to Download

package EvalScalar;
use Carp;

...
}

1;

#!/usr/bin/perl -w
use strict;

...

$a = '"But unqualified subs will be called in EvalScalar namespace" . 
+foo()';
print $a;