Beefy Boxes and Bandwidth Generously Provided by pair Networks
laziness, impatience, and hubris

Re^3: inserting HTML file in a PERL script

by Tortue (Scribe)
on May 29, 2005 at 19:04 UTC ( [id://461561] : note . print w/replies, xml ) Need Help??

Help for this page

Select Code to Download

  1. or download this
    my $template = snarf('template.htm');
    while ($template =~ /(\$[:alpha:]\w*)/g) {
      $template =~ s/\Q$variable_name\E/$value/g;
    print $template;