Second page

my $path = "tmp/$filename"; open my $htmlOut, '>', $path or die "Can't create $path: $!\n"; print $htmlOut < Second page
$t->{title}
$t->{phone}
HTML close $htmlOut; ##

##

use strict;
use warnings;
use HTML::Template;

my $template = <

 Second page 







HTML

my $tmpl = HTML::Template->new(scalarref => \$template);

$tmpl->param(title => "Sir Robin", phone => '555-123-45678');
print $tmpl->output();

##

##



 Second page 

Sir Robin

555-123-45678