📄 reg_html.cgi
字号:
#!/perl/bin/perl
print "Content-type: text/html\n\n";
print qq~
<html><head><title>REGISTER</title></head><body>
<div align=center><center>
<table border=0 width=755><tr><td width=755 align=left>
<form action=reg.cgi method=post >
<br><b>1. User must fill in:</b><ul>
USER NAME: <input name=username size=20><br>
YOUR NAME: <input name=userturename size=20> <br>
PASSWORD: <input name=userpassword type=password size=20><br>
REPEAT PASSWORD: <input name=userpasswd1 type=password size=20><br>
EMAIL ADDRESS: <input name=useremail size=20> <br>
Telephone Number: <input name=userphone size=20><br>
Address: <input name=useraddress size=40><br>
</ul>
</td></tr></table><table border=0 width=755><tr><td width=755 align=left>
<b>2. Selective fill in:</b> <ul>
Gender: <input name=usersex type=radio value=male checked>male <input name=sex type=radio value=female>female<br>
Like: <input name=userlike size=40><br>
From: <input name=userfrom size=20><br>
QQ Number: <input name=useroicq size=20><br>
</ul></td></tr></table>
~;
print "<br><table border=0 width=755><tr><td width=755 align=center><input type=submit value=\"ENTER\" style=\"BACKGROUND-COLOR: #FFFFDD; BORDER-BOTTOM: #339999 1px solid; BORDER-LEFT: #339999 1px solid; BORDER-RIGHT: #339999 1px solid; BORDER-TOP: #339999 1px solid; FONT-SIZE: 9pt;color:0000FF;text-decoration:underline\"> <input type=\"reset\" value=\"CENCEL\" onclick=\"javascript:history.back()\" style=\"BACKGROUND-COLOR: #FFFFDD; BORDER-BOTTOM: #339999 1px solid; BORDER-LEFT: #339999 1px solid; BORDER-RIGHT: #339999 1px solid; BORDER-TOP: #339999 1px solid; FONT-SIZE: 9pt;color:0000FF;text-decoration:underline\"></form></td></tr></table></body></html>";
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -