AWS-Lambda
3 results

 view release on metacpan or  search on metacpan

examples/cgi/WwwCounter/readme.html  view on Meta::CPAN 

<html>
<head>
<meta http-equiv="Content-type" content="text/html; charset=Shift_JIS">
<title>WwwCounter Ver3.15利用メモ - とほほのWWW入門</title>
<style type="text/css">
<!--
BODY {
    color: #333333;
}
H2 {
    width: 100%;
    font-weight: bold;
    color: #ffffff;

examples/cgi/WwwCounter/sample.html  view on Meta::CPAN 

<!doctype html>
<html>
<head>
<meta charset="utf-8">
<title>WwwCounterサンプル - とほほのWWW入門</title>
<meta name="viewport" content="width=device-width,initial-scale=1.0">
<style>
.i { margin-left: 1rem; }
</style>
</head>
<body>
<h2 align="center">WwwCounterサンプル</h2>
<hr>

examples/cgi/WwwCounter/wwwcount.cgi  view on Meta::CPAN 


#
# CGIが使用できるかテストを行う。
#
sub test {
	print "Content-type: text/html\n";
	print "\n";
	print "<!doctype html>\n";
	print "<html>\n";
	print "<head>\n";
	print "<meta charset='utf-8'>\n";
    print "<title>Test</title>\n";
    print "</head>\n";
	print "<body>\n";
	print "<p>OK. CGIスクリプトは正常に動いています。</p>\n";
	if ($g_mailto ne "") {
		if (! -f $g_sendmail) {
			print "<p>ERROR: $g_sendmail が存在しません。</p>\n";
		}
	}
	if (!-d $g_lock_dir) {



( run in 0.239 second using v1.01-cache-2.11-cpan-4d50c553e7e )