Select Code to Download

use strict;
my $contents = param("$a");

my @contents = split( /\n/, $contents );
$contents = join( "<br>", @contents );

$contents =~ s/\n/<br>/g;