📄 index.pl
字号:
$CountFile = "counter";
open (COUNT, $CountFile);
$Counter = <COUNT>;
close (COUNT);
open (COUNT, ">$CountFile");
$Counter += 1;
print COUNT $Counter;
close (COUNT);
my $time = localtime;
my $remote_id = $ENV{REMOTE_HOST} || $ENV{REMOTE_ADDR};
my $admin_email = $ENV{SERVER_ADMIN};
print "Content-type: text/html\n\n";
print <<END_OF_PAGE;
<HTML>
<HEAD>
<TITLE>littlebean</TITLE>
<style type="text/css">
<!--
body,td,th
{
font-family: "新宋体";
font-size: 14px;
}
.STYLE1
{
font-family: "仿宋_GB2312";
font-size: 18px;
}
.STYLE3
{
font-size: 16;
}
body
{
background-color: #999999;
}
-->
</style>
</HEAD>
<body>
<form id="form1" name="form1" method="get" action="/cgi-bin/cgi.cgi" >
<div align="center">
<table width="461" height="160" border="2" cellpadding="1" cellspacing="1" bordercolor="#CCCCCC" bgcolor="#66FFFF">
<tr>
<td height="34" colspan="3"><div align="center" class="STYLE1">读写器配置</div></td>
</tr>
<tr>
<td width="128" height="15"><div align="right" class="STYLE3">读写器ID:</div></td>
<td width="318" height="15" colspan="2">$Counter</td>
</tr>
<tr>
<td height = "15"><div align = "right" class = "STYLE3">读写器版本:</div></td>
<td height = "15" colspan = "2" > </td>
</tr>
<tr>
<td height="15"><div align="right" class="STYLE3">IP地址:</div></td>
<td height="15" colspan="2"> </td>
</tr>
<tr>
<td height = "15"><div align = "right" class = "STYLE3">子网掩码:</div></td>
<td height = "15" colspan = "2"> </td>
</tr>
<tr>
<td height = "15"><div align = "right" class = "STYLE3">网关:</div></td>
<td height = "15" colspan = "2"> </td>
</tr>
<tr>
<td height = "15"><div align = "right" class = "STYLE3">DNS地址:</div></td>
<td height = "15" colspan = "2"> </td>
</tr>
<tr>
<td height="15"><div align="right" class="STYLE3">功率:</div></td>
<td height="15" colspan="2"> </td>
</tr>
<tr>
<td height="15"><div align="right" class="STYLE3">MAC地址:</div></td>
<td height="15" colspan="2"> </td>
</tr>
<tr>
<td height="27" colspan="3"><div align="right" class="STYLE3">
<label>
<div align="center">
<input name="ok" type="submit" class="STYLE1" id="ok" value="确定" />
<input name="cancel" type="reset" class="STYLE1" id="cancel" value="取消" />
</div>
</label>
</div>
<div align="center"></div>
</td>
</tr>
</table>
</div>
</form>
</body>
</HTML>
END_OF_PAGE
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -