Select Code to Download

use CGI;
my $q = CGI->new();
...

my $string = "What a lovely function!";
$string = CGI::escape($string);