#!/usr/bin/perl

$outputfile = ”

http://www.withmama.info/MAMAKAI/AREA.html

”;

#↑相対パスで記述してみてください。

#読み込み

open(TEMPLATE, $outputfile) or die ”can’t open error.html: $!”;

local($/) = undef;

my $template = ”

http://withmama.info/

withママへ、ようこそ!

”;

close(TEMPLATE);

#吐き出す

print ”Content-Type: text/html¥n¥n”;

print $template;

exit;