ID: 511
Viewed: 3459
Added: Sep 30, 2003
Version: unknown
Snippet uploaded by: Lee Trussell
Written By: Lee Trussell
Demo: Sorry, no demo
Thank you for your vote. Please wait...
It appears you already voted for this snippet
It appears your vote value was empty
A simple function to read html file find a tag and replace it with custom html code...
<!---Head--->
none
<!---Body--->
sub file_rep
{
my ($replace,$replacement,$html) = @_;
#be carful about cgi security if parsing value
$html =~ s/$replace/$replacement/;
retu\r\n $html;
}
my $html;
open(file,"C:\windows\deskop\files.html") || die("This file will not open");
$html .= $_ while(<file>);
close(file);
$html = &file_rep("<!--tag-->","<b>bold text</b>",$html);
print "Content-type: text/htmlnn";
print $html;
No Comments to show
Please completely fill out the form below if you want to review this snippet. All reviews are subject to validation.
Adding your comment. Please wait...
Thanks for adding your comment!. After further review it will be added.
There was a problem adding your comment. Please try again.
Please complete all the fields in the form before sending.