Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
[b]#!/usr/bin/perl[/b]
print "Content-type: text/html\n\n";
read (STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
if ($buffer) {
print "We have POST data...<br>";
print $buffer;
$buffer =~ s/^editfield=//;
$buffer =~ s/%0D%0A/\n/g;
open (OUT, "> user_editable.txt");
print OUT $buffer;
close OUT;
}
open (IN, "< user_editable.txt");
undef $/;
$_ = <IN>;
$/ = "\n";
close IN;
print <<HTML;
<form action=$0 method=POST>
<textarea cols=50 rows=10 name=editfield>$_</textarea>
<input type=submit>
</form>
HTML
# end of script