Select Code to Download

my $temp = "";

while ( <> ) {
    $temp .= $_."\n";
}