Select Code to Download

my $name = 'John';
my $html = get_html(); # sub name corrected
...
HTML
return $html;
}

<p>Hi there <!-- name --></p>

my $html = get_html();
$html =~ s/<!-- name -->/$name/;

my $html;
{
...
  close $fh
    or die "cannot close $file: $!";
}