Select Code to Download

use strict;
use warnings;
...
eval " say '$var' ";

eval { say '$var' };

use strict;
use warnings;
...
my $var = q(Hello',"\n");

eval "print '$var";