[PerlChina] China-pm Digest, Vol 38, Issue 4

gary jsz gary.jsz at gmail.com
Wed Jun 4 22:09:34 PDT 2008


HOHO,自己太笨了,现在弄明白了,没有搞清楚apche的权限,谢谢大家的帮助。

2008/6/5 <china-pm-request at pm.org>:

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



-- 
gary
gary.jsz at gmail.com
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://mail.pm.org/pipermail/china-pm/attachments/20080605/7df7fdb4/attachment-0001.html 


More information about the China-pm mailing list