Select Code to Download

$wrapper =~ s/\</&lt;/g;
$wrapper =~ s/\>/&gt;/g;

$wrapper =~ s/foo/bar/g;
$wrapper =~ s/bar/foo/g;
...