One way would be something like this:
code:
#############################################
# Define path to file
$HTML_file = "/path/to/HTML_file";
# Open HTML file to print output
open(FILE,"<$HTML_file") | | die "Can't open $HTML_file file";
@lines = <FILE>;
close(FILE);
foreach $line (@lines) {
# Insert the marker<!--INSERT--> in the HTML # page where you whant the
# new line printed in the file.
if ($line =~ /<!--INSERT-->/) {
print qq|the line you want here|;
exit;
}
else { chop ($line) if ($line =~ /n$/); print "$linen"; }
}
######################################
Hope this helps

------------------
Mike(mickalo)Blezien
Thunder Rain Internet Publishing
Providing Personal/Business
Internet Solutions that work!
http://www.thunder-rain.com Email:
info@thunder-rain.com
_________________________
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
Thunder Rain Internet Publishing
Providing Internet Solutions that work!
http://thunder-rain.com/ Tel: 1.712.395.0670
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-