Select Code to Download

my $cgi = new CGI;
my $subject = $cgi->param('subject');
...
    s/\n/<br\/>\n/g;
}
print @b;