Beefy Boxes and Bandwidth Generously Provided by pair Networks
We don't bite newbies here... much
 
PerlMonks  

Re^2: System commands using CGI

by nikhilB (Initiate)
on Dec 03, 2012 at 06:48 UTC ( [id://1006805]=note: print w/replies, xml ) Need Help??


in reply to Re: System commands using CGI
in thread System commands using CGI

Hi rgt, Thanks for the reply. I tried using the following but it looks like the command doesnt get executed from the CGI :
#!/usr/bin/perl print "content-type: text/html \n\n"; # SET UP THE TABLE print "<table border='1'>"; print "<th>Test</th><th>Value</th><th>Expected Value</th><th>Result</t +h>"; $b=`/usr/bin/who>>/root/abcd.txt`; print "$array[1]\n\n"; #print "VALUE IS $b\n\n"; print "<tr><td>".$b."</td>";
When I run this from the command prompt, it the gives the correct output.

Any idea where I am going wrong ?

Thanks.

Replies are listed 'Best First'.
Re^3: System commands using CGI
by rjt (Curate) on Dec 03, 2012 at 09:05 UTC

    Your code here did not generate that output. It was hard to read without <code> tags, so I reformatted it for you:

    #!/usr/bin/perl print "content-type: text/html \n\n"; # SET UP THE TABLE print ""; print ""; $b=`/usr/bin/who&gt;&gt;/root/abcd.txt`; print "$array<a href="?node=1">1</a>\n\n"; # <== FIXME #print "VALUE IS $b\n\n"; print "";

    Your code here does not compile. You need to escape the double quotes in your print "$array... line.

    Beyond that, however, why in the world are you trying to append the output of /usr/bin/who to /root/abcd.txt? More to the point, please let us know exactly what your CGI program is supposed to do, and perhaps then we can get to the root of the problem (no pun intended... or maybe it was...).

Re^3: System commands using CGI
by Anonymous Monk on Dec 03, 2012 at 07:35 UTC

    A webserver with root access? Doubtful

Re^3: System commands using CGI
by bitingduck (Chaplain) on Dec 03, 2012 at 16:32 UTC

    The lack of code tags that rjt pointed out also munges up the formatting of the replies. It looks like the empty print statements in what he posted contain table related tags, like:

    #!/usr/bin/perl print "content-type: text/html \n\n"; # SET UP THE TABLE print "<table border='1'>"; print "<th>Test</th><th>Value</th><th>Expected Value</th><th>Result</t +h>"; $b=`/usr/bin/who>>/root/abcd.txt`; print "$array<a href="?node=1">1</a>\n\n"; #print "VALUE IS $b\n\n"; print "<tr><td>".$b."</td>";
    It would make it easier to sort out the replies if you can go back and wrap your code in code tags.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://1006805]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others avoiding work at the Monastery: (5)
As of 2024-04-23 18:37 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found