Skip to content
This repository

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
tree: 6d234fe140
Fetching contributors…

Cannot retrieve contributors at this time

executable file 62 lines (54 sloc) 1.924 kb
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62
#!/usr/bin/perl

# 2012/09/26
# ↓これ書くと500エラーになる
# use strict;
# use warnings;

# 2012/09/26
# あんちぽ先生に書いていただいた
# login_idが定義されている?
# - 「 Common::GetCookie();」したものを「%cookie」の中に入れている?
# %と$の違いを明確にしておく
# ---------------------------------------

require 'common.pl';
my %cookie = Common::GetCookie();
my $login_id = $cookie{login_id};

print "Content-type: text/html\n\n";

print << "END_OF_HTML";
<html>
<body>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<meta http-equiv="Content-Style-Type" content="text/css" />
<meta http-equiv="Content-Script-Type" content="text/javascript" />

<!--viewportの指定-->
<meta name="viewport" content="width=device-width,initial-scale=1.0,minimum-scale=1.0,maximum-scale=1.0,user-scalable=0" />
<!--/viewportの指定-->
<!--メディアクエリでPC用・スマホ用CSSを振り分け-->
<link media="only screen and (min-device-width:481px)" href="style.css" type="text/css" rel="stylesheet" />
<link media="only screen and (max-device-width:480px)" href="istyle.css" type="text/css" rel="stylesheet" />
<!--/メディアクエリでPC用・スマホ用CSSを振り分け-->

<link href="style.css" type="text/css" rel="stylesheet" />
<title>管理画面 - nikki</title>
</head>
<html>
<body>
<div id="contents">
<div id ="wrapper">
<a href="admin.cgi"><img src="images/admin.gif" /></a><br>
<img src="images/line.gif" /><br><br>
</div>
<img src="images/write.gif" />
<form action="entry_post.cgi" method="post">
<input type="hidden" name="login_id" value="$login_id">
<br>
<textarea name="entry_text" value="$entry_text" id="entry_text_form" /></textarea>
<br><br>
<input type="submit" value="投稿" class="form_button"><br><br>
<img src="images/line.gif" /><br>
</form>
</div>

</div>
</body>
</html>
END_OF_HTML
exit;
Something went wrong with that request. Please try again.