Perl コーディング初心者質問コーナー Part26

このエントリーをはてなブックマークに追加
970 ：nobodyさん：
# HTMLの出力
print "<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.01//EN\">\n";
print "<html>\n";
print "<head><title>対戦バトル</title></head>\n";
print "<body>
<p>Player1：体力は$HP1です</p>
<p>Player2：体力は$HP2です</p>
<p>Player1は<big>$kougeki1</big>のダメージを与えた。</p>
<p>Player1は<big>$kougeki1</big>のダメージを受けて混乱した。
<p>Player1は<big>$kougeki1</big>のダメージで野原でクソをし始めた。
<p>Player2は<big>>$kougeki2</big>のダメージを与えた。</p>
<p>Player2は<big>>$kougeki2</big>のダメージを受けて裸踊りを始めた。
<p>Player2は<big>>$kougeki2</big>のダメージで道を歩いていた女にレイプし始めた。</p></p></body>\n";
print "</html>";
971 ：nobodyさん：03/08/13 16:48 ID:???
∧∧∧∧∧∧∧∧∧∧∧∧∧∧∧∧∧∧∧∧∧∧∧∧∧
＜ 　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 ＞
＜　動カンカッタ>>720-736ーーーーーーーーー！！　　　　＞
＜　　 　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 ＞
　 ∨∨∨∨∨∨∨∨∨∨∨＼　 ／∨∨∨∨∨∨∨∨∨∨∨
　　　　　　　　 　／:|.　　　　　　　|　|　　　　　／:|
　　　　　　　 ／　 .:::|　　　　　　　∨　　　 ／　 :::|
　　　　　　　 |　　...:::::|　　　　　　　　　 　/　　　::::|
　　　　　　　i　　　 　 ￣￣⌒ﾞﾞ^――／　　 　::::::::|
　　　　　　/＿,,___　　　　　　 . _,,,,__,_　　　　　:::::::::::＼
　　　　 　／　　　ﾞ^＼ヽ..　 , /ﾞ　　　¨＼,.-z　　　::::::::::＼
　　　　 　「　●　　　　| 》　 l| 　●　　　 ﾞ》　ミ..　　　.::::::＼
　　　 　/i,.　　　　　 .,ﾉ .l|　 《 　　　　　 ..|´_ilﾄ　　　　::::::::::＼
　　　　/　＼___,,,,,_／ .'″　　^=u,,,,_ v／.. 　　　　　　:::::::::::::l!
　　　 |　　　　　　　　　　　￣　,,､　　　　　　　　　i し.／::::::::.｝
　　　|　　/ 　,,__＿＿　_,／￣　＼　＼　　　　　 ﾉ　(　　::::::::::|
　　　 |　　|.. |　／└└└└＼../＼　　＼　　 　'~ヽ　::::::::::::::｝
　　　　|　 　.∨.|llllllllllllllllllllllllllllllllllllllll|　　　　　　　::::::::::｛
　　　　| 　　　|.|llllllllllll;／⌒／⌒　　〕　　　　　　　　　　:::::::::::｝
　　　　 |　　　|.|lllllllll;　　　./　.　　 .　|　　　　　　　　　　::::::::::［
　　　　 .|　　　|.|llllll|′　　/　　　　.　|　　　 .|　　　　　　:::::::::::|
　　　　　.|　　 |.|llll| 　　　| 　　　　.∧〔　　　/　　　　:::::::::::::／
　　　　／　｝.∧lll　　　　|　　　　../　/　　／　　　:::::::::::::::::＼
　　 ／　　　/|　＼┌┌┌┌┌/.／　／:::　 　　　　:::::::::::::::::＼
　　　　　　(　ﾞﾞ^^¨^¨ﾞﾞ¨　￣￣￣　／:::::::::::