Re: Print substitution ?



Try something more like:

my $name = 'Freddy';
open(my $header, '<', '../header.htm') or die "Can't read
'../header.htm': $!\n";
for (<$header>) {
s/(\$\w+)/$1/eg;
print_html($_);
}
close($header);

.