> Hi Dan, Hii, please post to the list so everyone can learn and help.
> > I have a little more problem in running system command > from cgi file. Even I wrote a perl file so that I can > run the system command from the perl file. But the > perl file is also not executing the system command. I > could run the short commands from the cgi > file. > > I am sending the scripte for your kind considerations, > > Looking forward for your reply. > With regards, > Soumyadeep > > > > I am sending the request from the perl file I think I see the path you're trying to take. What is the problem you're having? I can read that the "perl script is not executing the system command" but Which system call? What is ihappening that makes you think it's not executing? Any errors in any logs? Which of the 3 scripts below is it happening in? Etc. etc.. > > send.pl-------------------------- > #!/usr/bin/perl > use warnings; > use strict; > > use LWP::UserAgent; > > use LWP; > my $ua = new LWP::UserAgent; > my $req = new HTTP::Request POST => > 'http://localhost/cgi-> bin/bic_genscan/file3.cgi'; > > > $req->content_type('application/x-www-form-urlencoded'); > $req->content('st=atgtcgatcagctacgatc'); > my $res = $ua->request($req); > > > if($res->is_success){ > print $res->content; > }else{ > print "Error: ".$res->status_line."\n"; > } > > exit; > ------------------------------------ > > Receiving the request by cgi file > > file3.cgi----------- > #!/usr/bin/perl -w > > use CGI; > > print "Content-type:text/plain\n\n"; > > $query = new CGI; > > print "blast\n"; > > $str = $query->param('st'); > > print "here the string is : $str\n"; > > system("./perl1.pl"); > ------------------------------------------- > > And processing the request by another perl file > > perl1.pl------------- > > #!/usr/bin/perl > > $str = shift; How come you never use this variable? > print "received the sequence\n"; > system("/home/soumya/Application/BLAST/blastall -p blastn -d > /home/soumya/Application/BLAST/data/ecoli.nt > -i /var/www/cgi-bin/bic_genscan/testseq"); > print "done...\n"; > > __________________________________________________ > Do you Yahoo!? > Yahoo! Platinum - Watch CBS' NCAA March Madness, live on your > desktop! http://platinum.yahoo.com > -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
