这个文件的所属者为root,而/bin/ls这个文件也是所有用户都可以运行的。<br><br>请问还需要哪里设置嘛?<br><br><div class="gmail_quote">2008/6/5 <<a href="mailto:china-pm-request@pm.org">china-pm-request@pm.org</a>>:<br><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
Send China-pm mailing list submissions to<br>
<a href="mailto:china-pm@pm.org">china-pm@pm.org</a><br>
<br>
To subscribe or unsubscribe via the World Wide Web, visit<br>
<a href="http://mail.pm.org/mailman/listinfo/china-pm" target="_blank">http://mail.pm.org/mailman/listinfo/china-pm</a><br>
or, via email, send a message with subject or body 'help' to<br>
<a href="mailto:china-pm-request@pm.org">china-pm-request@pm.org</a><br>
<br>
You can reach the person managing the list at<br>
<a href="mailto:china-pm-owner@pm.org">china-pm-owner@pm.org</a><br>
<br>
When replying, please edit your Subject line so it is more specific<br>
than "Re: Contents of China-pm digest..."<br>
<br>
<br>
Today's Topics:<br>
<br>
1. 请教perl cgi页面如何显示ls信息 (gary.jsz)<br>
2. 请教perl cgi页面如何显示ls信息 (gary.jsz)<br>
3. Re: 请教perl cgi页面如何显示ls信息 (Yisu Dong)<br>
4. Re: 请教perl cgi页面如何显示ls信息 (truncatei)<br>
<br>
<br>
----------------------------------------------------------------------<br>
<br>
Message: 1<br>
Date: Thu, 5 Jun 2008 11:11:09 +0800<br>
From: "gary.jsz" <<a href="mailto:gary.jsz@gmail.com">gary.jsz@gmail.com</a>><br>
Subject: [PerlChina] 请教perl cgi页面如何显示ls信息<br>
To: "<a href="mailto:china-pm@pm.org">china-pm@pm.org</a>" <<a href="mailto:china-pm@pm.org">china-pm@pm.org</a>>, "<a href="mailto:china-pm@pm.org">china-pm@pm.org</a>"<br>
<<a href="mailto:china-pm@pm.org">china-pm@pm.org</a>><br>
Message-ID: <<a href="mailto:200806051111065626409@gmail.com">200806051111065626409@gmail.com</a>><br>
Content-Type: text/plain; charset="gb2312"<br>
<br>
我的代码如下:<br>
#!/usr/bin/perl -w<br>
#<br>
use strict;<br>
use utf8;<br>
#use CGI qw/:standard/;<br>
use CGI qw/:all/;<br>
print header,<br>
start_html("Mailing list manager system page"),<br>
h1('Maillist&#31649;&#29702;&#31995;&#32479; '),<br>
start_form,<br>
"What are you doing?",<br>
popup_menu(-name=>'choose',<br>
-values=>[qw(select create delete modify)]),p,<br>
submit,<br>
end_form,<br>
hr;<br>
if(param()){<br>
if (em(param('choose')) =~ /select/){<br>
system "date";<br>
print `ls -l \$HOME`;<br>
#system "ls -l \$HOME"<br>
}<br>
if (em(param('choose')) =~ /create/){<br>
system "date -u";<br>
<br>
}<br>
}<br>
<br>
其中时间能正确显示,但是,就是不能打印 ls -l $HOME 这行,换成 system "ls -l \$HOME"也不能打印,还希望各位老师能指教,谢谢!<br>
<br>
<br>
<br>
<br>
Gary.jsz<br>
-------------- next part --------------<br>
An HTML attachment was scrubbed...<br>
URL: <a href="http://mail.pm.org/pipermail/china-pm/attachments/20080605/c3200526/attachment-0002.html" target="_blank">http://mail.pm.org/pipermail/china-pm/attachments/20080605/c3200526/attachment-0002.html</a><br>
<br>
------------------------------<br>
<br>
Message: 2<br>
Date: Thu, 5 Jun 2008 11:11:09 +0800<br>
From: "gary.jsz" <<a href="mailto:gary.jsz@gmail.com">gary.jsz@gmail.com</a>><br>
Subject: [PerlChina] 请教perl cgi页面如何显示ls信息<br>
To: "<a href="mailto:china-pm@pm.org">china-pm@pm.org</a>" <<a href="mailto:china-pm@pm.org">china-pm@pm.org</a>>, "<a href="mailto:china-pm@pm.org">china-pm@pm.org</a>"<br>
<<a href="mailto:china-pm@pm.org">china-pm@pm.org</a>><br>
Message-ID: <<a href="mailto:200806051111065626409@gmail.com">200806051111065626409@gmail.com</a>><br>
Content-Type: text/plain; charset="gb2312"<br>
<br>
我的代码如下:<br>
#!/usr/bin/perl -w<br>
#<br>
use strict;<br>
use utf8;<br>
#use CGI qw/:standard/;<br>
use CGI qw/:all/;<br>
print header,<br>
start_html("Mailing list manager system page"),<br>
h1('Maillist&#31649;&#29702;&#31995;&#32479; '),<br>
start_form,<br>
"What are you doing?",<br>
popup_menu(-name=>'choose',<br>
-values=>[qw(select create delete modify)]),p,<br>
submit,<br>
end_form,<br>
hr;<br>
if(param()){<br>
if (em(param('choose')) =~ /select/){<br>
system "date";<br>
print `ls -l \$HOME`;<br>
#system "ls -l \$HOME"<br>
}<br>
if (em(param('choose')) =~ /create/){<br>
system "date -u";<br>
<br>
}<br>
}<br>
<br>
其中时间能正确显示,但是,就是不能打印 ls -l $HOME 这行,换成 system "ls -l \$HOME"也不能打印,还希望各位老师能指教,谢谢!<br>
<br>
<br>
<br>
<br>
Gary.jsz<br>
-------------- next part --------------<br>
An HTML attachment was scrubbed...<br>
URL: <a href="http://mail.pm.org/pipermail/china-pm/attachments/20080605/c3200526/attachment-0003.html" target="_blank">http://mail.pm.org/pipermail/china-pm/attachments/20080605/c3200526/attachment-0003.html</a><br>
<br>
------------------------------<br>
<br>
Message: 3<br>
Date: Thu, 5 Jun 2008 11:20:16 +0800<br>
From: "Yisu Dong" <<a href="mailto:ximiff@gmail.com">ximiff@gmail.com</a>><br>
Subject: Re: [PerlChina] 请教perl cgi页面如何显示ls信息<br>
To: <a href="mailto:china-pm@pm.org">china-pm@pm.org</a><br>
Message-ID:<br>
<<a href="mailto:b3a8e37e0806042020w744d564bp4cfb66eb1edab008@mail.gmail.com">b3a8e37e0806042020w744d564bp4cfb66eb1edab008@mail.gmail.com</a>><br>
Content-Type: text/plain; charset="gb2312"<br>
<br>
我的没有问题。可以打印<br>
<br>
2008/6/5 gary.jsz <<a href="mailto:gary.jsz@gmail.com">gary.jsz@gmail.com</a>>:<br>
<br>
> 我的代码如下:<br>
> #!/usr/bin/perl -w<br>
> #<br>
> use strict;<br>
> use utf8;<br>
> #use CGI qw/:standard/;<br>
> use CGI qw/:all/;<br>
> print header,<br>
> start_html("Mailing list manager system page"),<br>
> h1('Maillist&#31649;&#29702;&#31995;&#32479; '),<br>
> start_form,<br>
> "What are you doing?",<br>
> popup_menu(-name=>'choose',<br>
> -values=>[qw(select create delete modify)]),p,<br>
> submit,<br>
> end_form,<br>
> hr;<br>
> if(param()){<br>
> if (em(param('choose')) =~ /select/){<br>
> system "date";<br>
> print `ls -l \$HOME`;<br>
> #system "ls -l \$HOME"<br>
> }<br>
> if (em(param('choose')) =~ /create/){<br>
> system "date -u";<br>
><br>
> }<br>
> }<br>
><br>
> 其中时间能正确显示,但是,就是不能打印 ls -l $HOME 这行,换成 system "ls -l<br>
> \$HOME"也不能打印,还希望各位老师能指教,谢谢!<br>
><br>
> ------------------------------<br>
> Gary.jsz<br>
><br>
><br>
> _______________________________________________<br>
> China-pm mailing list<br>
> <a href="mailto:China-pm@pm.org">China-pm@pm.org</a><br>
> <a href="http://mail.pm.org/mailman/listinfo/china-pm" target="_blank">http://mail.pm.org/mailman/listinfo/china-pm</a><br>
><br>
-------------- next part --------------<br>
An HTML attachment was scrubbed...<br>
URL: <a href="http://mail.pm.org/pipermail/china-pm/attachments/20080605/a285188b/attachment-0001.html" target="_blank">http://mail.pm.org/pipermail/china-pm/attachments/20080605/a285188b/attachment-0001.html</a><br>
<br>
------------------------------<br>
<br>
Message: 4<br>
Date: Thu, 5 Jun 2008 11:40:08 +0800<br>
From: truncatei <<a href="mailto:truncatei@gmail.com">truncatei@gmail.com</a>><br>
Subject: Re: [PerlChina] 请教perl cgi页面如何显示ls信息<br>
To: <a href="mailto:china-pm@pm.org">china-pm@pm.org</a><br>
Message-ID:<br>
<<a href="mailto:c0d775f40806042040g76f87854re4669cde449a3180@mail.gmail.com">c0d775f40806042040g76f87854re4669cde449a3180@mail.gmail.com</a>><br>
Content-Type: text/plain; charset=UTF-8<br>
<br>
看下运行这个CGI的用户身份,Apache一般运行在不同的用户帐号下<br>
<br>
2008/6/5 gary.jsz <<a href="mailto:gary.jsz@gmail.com">gary.jsz@gmail.com</a>>:<br>
> 我的代码如下:<br>
> #!/usr/bin/perl -w<br>
> #<br>
> use strict;<br>
> use utf8;<br>
> #use CGI qw/:standard/;<br>
> use CGI qw/:all/;<br>
> print header,<br>
> start_html("Mailing list manager system page"),<br>
> h1('Maillist&#31649;&#29702;&#31995;&#32479; '),<br>
> start_form,<br>
> "What are you doing?",<br>
> popup_menu(-name=>'choose',<br>
> -values=>[qw(select create delete modify)]),p,<br>
> submit,<br>
> end_form,<br>
> hr;<br>
> if(param()){<br>
> if (em(param('choose')) =~ /select/){<br>
> system "date";<br>
> print `ls -l \$HOME`;<br>
> #system "ls -l \$HOME"<br>
> }<br>
> if (em(param('choose')) =~ /create/){<br>
> system "date -u";<br>
><br>
> }<br>
> }<br>
><br>
> 其中时间能正确显示,但是,就是不能打印 ls -l $HOME 这行,换成 system "ls -l<br>
> \$HOME"也不能打印,还希望各位老师能指教,谢谢!<br>
><br>
> ________________________________<br>
> Gary.jsz<br>
><br>
<br>
------------------------------<br>
<br>
_______________________________________________<br>
China-pm mailing list<br>
<a href="mailto:China-pm@pm.org">China-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/china-pm" target="_blank">http://mail.pm.org/mailman/listinfo/china-pm</a><br>
<br>
End of China-pm Digest, Vol 38, Issue 3<br>
***************************************<br>
</blockquote></div><br><br clear="all"><br>-- <br>gary<br><a href="mailto:gary.jsz@gmail.com">gary.jsz@gmail.com</a>