Select Code to Download

my $a = 'perl';
my $b = '$a is good';
...
print "a=$a\n";
print "b=$b\n";
print "c=$c\n";