Написал вот такой скрипт.. При запуске его вручную отрабатывает нормально.
А при запуске в кроне - зависает!#!/usr/bin/perl
$|=1;
$dstDir = '/.1/work/';
$ftp = 'ftp://192.168.13.254/pub/';
$file = '123.txt';
$s = system ("fetch","-q","-o",$file,$ftp.$file);
...
...Причем файлик 123.txt закачивает и на этом всё - вешается!
Вешается - в смысле не прекращает работу..
ps ax -показывает:
# ps ax|grep my
37131 ?? Ss 0:00.01 /bin/sh -c /usr/local/binL/my.pl
37132 ?? S 0:00.01 /usr/bin/perl /usr/local/binL/my.plПодскажите чего я делаю неправильно... и как сделать правильно..?
>Написал вот такой скрипт.. При запуске его вручную отрабатывает нормально.
>А при запуске в кроне - зависает!
>
>#!/usr/bin/perl
>$|=1;
>$dstDir = '/.1/work/';
>$ftp = 'ftp://192.168.13.254/pub/';
>$file = '123.txt';
>$s = system ("fetch","-q","-o",$file,$ftp.$file);
>...а что дальше делается с переменной $s? и вообще зачем она, ведь она будет равна 0, поскольку стоит quit mode
невижу смысла назначения -o $file, он и так будет такого же имени.
system <fetch -q $ftp$file>
>...
>
>Причем файлик 123.txt закачивает и на этом всё - вешается!
>Вешается - в смысле не прекращает работу..
>ps ax -показывает:
># ps ax|grep my
>37131 ?? Ss 0:00.01 /bin/sh -c
>/usr/local/binL/my.pl
>37132 ?? S 0:00.01 /usr/bin/perl
>/usr/local/binL/my.pl
>Подскажите чего я делаю неправильно... и как сделать правильно..?
>она будет равна 0, поскольку стоит quit modeпоправка: всегда 0
>system <fetch -q $ftp$file>
поправка: system <fetch -q $ftp$file>;
>>она будет равна 0, поскольку стоит quit mode
>
>поправка: всегда 0
>
>>system <fetch -q $ftp$file>
>
>поправка: system <fetch -q $ftp$file>;замени system на exec и забудь о зависах.