🚀 go-pugleaf

: > Witam
: >
: > Jest taki skrypt (openPerlIde, Windows), który działa j/n:
: >
: >
: > 1. połączenie z serwerem
: > use Net::Telnet ();
: > my $t = new Net::Telnet (Timeout=>100);
: > $t->open("10.92.115.1");
: >
: > 2. uruchomienie na w/w serwerze nakładki do obsługi urządzeń
: > $t->cmd("xpie");
: >
: > 3. następnie uruchamiam plik batch działający pod tą nakładką
: > (plik batch leży na w/w serwerze)
: > $t->cmd("xxxyyy.batch");
: > i jest ok batch się wykonuje, ale skrypt czeka. Ten batch
: > tworzy loga około 30 MB, trwa to ponad godzinę i sktypt po
: > chwili wyświetla time-out lub przekroczony rozmiar bufora.
:
: Może spróbuj ustawić stosowne opcje przy tworzeniu obiektu Telnet:
: http://search.cpan.org/~jrogers/Net-Telnet-3.03/lib/Net/Telnet.pm
: $obj = new Net::Telnet (
: [...]
:                         [Timeout    => $secs,]);
: Net::Telnet->new(Timeout => 20);
: The default Timeout is 10
:
: $obj->max_buffer_length - maximum size of input buffer
:
: >
: > I chodzi mi o to, żeby batch się uruchomił, a skrypt
: > poszedł dalej (nie czekał). Jest to możliwe??
:
: Tu bym sugerował zrobić forka:
:
: $pid=fork();
: if ($pid) {
:     # if - in main process - run init
:     # tu skrypt może pojść sobie dalej
:     # ...
: } else {
:     # else - in child process - opened pipe by open()
:     $t->cmd("xxxyyy.batch");
:     exit();
: };
:
dzięki za szybką odpowiedź, spróbowałem kilka
przykładów z użyciem fork i za każdym razem:
Wystąpił problem z aplikacją PerlIDE.exe i zostanie

ona zamknięta.

może użyć IPC::RUN ??

pozdrawiam