そもそもperlは使わない、なんてことは触れないとして、
cgiでhtmlをタグを書く際に、半角スペース4つ分のインデントを開けるのか?という疑問が湧いてくる。
他のコードを見ると、インデントは開けずに書いているように見えるが。。果たして。。
#!/usr/bin/perl -- use strict; use utf8; print "Content-type:text/html\n\n"; print "<!DOCTYPE html>"; print "<html>"; print "<head>"; print " <meta charset=\"UTF-8\">"; print " <title>ログイン|入稿管理支援システム</title>"; print " <link rel=\"stylesheet\" type=\"text/css\" href=\"asset/css/styles.css\" />"; print "</head>"; print "<header>"; print " <p><a href=\"index.html\">Hpscript</a></p>"; print " <nav>"; print " <p>入稿管理支援システム</p>"; print " </nav>"; print "</header>"; print "<body>"; print " <div id=\"content\">"; print " <h1>ログイン</h1>"; print " <form action=\"cgi-bin/hoge.cgi\" method=\"post\">"; print " <p>"; print " ユーザーID:<input type=\"text\" name=\"login_id\" size=\"30\">"; print " </p>"; print " <p>"; print " パスワード:<input type=\"text\" name=\"password\" size=\"30\">"; print " </p>"; print " <p>"; print " <input type=\"submit\" value=\"ログイン\">"; print " </p>"; print " </form>"; print " </div>"; print "</body>"; print "</html>";
インデントを付けたからと言って見やすくなるわけでもないから、いらないようにも思える。。