我正在制作一个 .cgi 文件,它以表格格式打印网页上数据库表中的所有值。问题是当我在 putty 终端模拟器上运行文件时它工作正常但是当我尝试在浏览器上运行文件时我得到即使 T 键入了服务器上文件的正确位置,也会出现错误消息“找不到文件”。
我不明白我做错了什么?我使用 putty 将文件的权限设置为 chmod 755 * 但它仍然无法正常工作。这是文件权限问题还是表结构在浏览器上运行时出现错误?
请帮忙...
人.CGI文件
#!/usr/bin/perl
use CGI;
use DBI;
use strict;
#use warnings;
#use diagnostics;
print "Content-type:text/html\r\n\r\n";
#$q = CGI->new;
#print $q->header;
my $dsn = "DBI:mysql:Demo:localhost"; # Data source name
my $username = "mint"; # User name
my $password = "MINT123"; # Password
my $dbh;
my $sth; # Database and statement handles
$dbh = DBI->connect($dsn, $username, $password);
$sth = $dbh->prepare("SELECT * from people");
$sth->execute();
print "<h1>ganesh</h1>";
print "<table >
<tr>
<th>ID</th>
<th>Name of People Involved</th>
<th>Position</th>
<th>Roles(A user can have multiple roles)</th>
<th>Notes</th>
</tr>";
while( my $href = $sth->fetchrow_hashref )
{
print "<tr>";
print "<td>$$href{'id'}</td>";
print "<td>$$href{'name'}</td>";
print "<td>$$href{'pos'}</td>";
print "<td>$$href{'role'}</td>";
print "<td>$$href{'notes'}</td>";
#print "<td><input type='text' value=\"$$href{'display_name'}\" id =\"dis-$$href{'windows_id'}\" readonly> </td>";
#print "<td><input type='text' value=\"$$href{'email_id'}\" readonly> </td>";
print "</tr>";
}
print "</table>";
$sth->finish();
$dbh->disconnect();
数据库表结构...
表数据...
当我在腻子中运行文件时输出...
当我尝试在浏览器上运行文件时出现消息..