Re: perl ssh

Article View: pl.comp.lang.perl

Article #52477

#52477

From: karraso
Date: Fri, 09 Nov 2012 12:19

28 lines
2198 bytes

Witam
Ok doszedłem do kroku w którym mi działa z perla

open(wynik, ">plik.txt");
use Net::SSH qw(sshopen2);
#use strict;

 $user = "user";
 $host = "host";
 $cmd = "/bin/bash";
 @commands = ('ls -l');

sshopen2("$user\@$host", *READER, *WRITER, "$cmd") || die "ssh: $!";
foreach(@commands) {
    print WRITER "$_ && echo DDDOOONNNEEE\n";
    while (<READER>) {
      chomp();
     push (@tablica, $_);
	  last if /DDDOOONNNEEE/;
      print "$_\n";
	  
  }
}
print wynik "@tablica";

Problem w tym że nie działa w CGI :(
Macie jakiś pomysł co robię źle.
Pzdr

Technical Details

Message-ID: <db507902-79fe-49fb-b60e-f7e3b943b6c9@googlegroups.com>

Path:

mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!agh.edu.pl!news.agh.edu.pl!newsfeed2.atman.pl!newsfeed.atman.pl!wsisiz.edu.pl!plix.pl!newsfeed2.plix.pl!news.nask.pl!news.nask.org.pl!newsfeed.pionier.net.pl!news.glorb.com!c7no13162891qap.0!news-out.google.com!gf5ni18188417qab.0!nntp.google.com!c7no13587572qap.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail

References:

<28e11e3c-bff4-4c31-aefe-e9a720e2059e@googlegroups.com> <slrnk9km7s.ni1.dozzie@jarowit.net> <7b92733b-1f7d-4c59-92cd-dede62119fac@googlegroups.com> <slrnk9l6ud.t57.fenio@serwer.fenski.pl> <18b7e264-624e-40ce-b9c5-b46d8c8be0f5@googlegroups.com> <0m3tm9-j9b.ln1@depesz.com> <6316f950-dfd8-446a-b6d7-e936f2c722f2@googlegroups.com> <kcltm9-ksi.ln1@depesz.com>

Show Full Headers

Complete Article Headers

Received: by 10.224.207.66 with SMTP id fx2mr6160880qab.7.1352463599992;        Fri, 09 Nov 2012 04:19:59 -0800 (PST)
Received: by 10.52.71.82 with SMTP id s18mr2295660vdu.9.1352463599969; Fri, 09 Nov 2012 04:19:59 -0800 (PST)
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!agh.edu.pl!news.agh.edu.pl!newsfeed2.atman.pl!newsfeed.atman.pl!wsisiz.edu.pl!plix.pl!newsfeed2.plix.pl!news.nask.pl!news.nask.org.pl!newsfeed.pionier.net.pl!news.glorb.com!c7no13162891qap.0!news-out.google.com!gf5ni18188417qab.0!nntp.google.com!c7no13587572qap.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail
Newsgroups: pl.comp.lang.perl
Date: Fri, 9 Nov 2012 04:19:59 -0800 (PST)
In-Reply-To: <kcltm9-ksi.ln1@depesz.com>
Complaints-To: groups-abuse@google.com
Injection-Info: glegroupsg2000goo.googlegroups.com; posting-host=212.160.172.70; posting-account=GAX2HgoAAACQOKx1s8yJKfaQWb7b1g8T
NNTP-Posting-Host: 212.160.172.70
References: <28e11e3c-bff4-4c31-aefe-e9a720e2059e@googlegroups.com> <slrnk9km7s.ni1.dozzie@jarowit.net> <7b92733b-1f7d-4c59-92cd-dede62119fac@googlegroups.com> <slrnk9l6ud.t57.fenio@serwer.fenski.pl> <18b7e264-624e-40ce-b9c5-b46d8c8be0f5@googlegroups.com> <0m3tm9-j9b.ln1@depesz.com> <6316f950-dfd8-446a-b6d7-e936f2c722f2@googlegroups.com> <kcltm9-ksi.ln1@depesz.com>
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <db507902-79fe-49fb-b60e-f7e3b943b6c9@googlegroups.com>
Subject: Re: perl ssh
From: karraso <gkrasinski@gmail.com>
Cc: depesz@depesz.com
Injection-Date: Fri, 09 Nov 2012 12:19:59 +0000
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

Reply to Parent Message