LINUX.ORG.RU
ФорумAdmin

nebol'shoj script na perl... - help!


0

0

Хочу сделать script... который провеяет на наличие '/katalog/nav/old.exe'... если оно есть... то запускает '/home/cop_nav;' и стирает '/katalog/nav/old.exe'

Может кто поможет? А то я новичёк в програмировании... до перла пока не добрался.
Мой вариант был следующим.... не работающим.
Хелп!

#!/usr/bin/perl

if (-e,'/katalog/nav/old.exe')
{
cmd('/home/cop_nav');
cmd('rm /katalog/nav/old.exe');
}

anonymous

когда отлаживаешь скрипт пиши первую строчку так: #!/usr/bin/perl -w тогда perl будет выдавать сообщения об ошибках. А так вроде запятая совсем не нужна после -e в условии if (...) и кавычки кажись двойные нужны.

tanatOS
()

А тебе на перле обязательно?
мож так? попрощще?


#!/bin/sh
CHECK="/katalog/nav/old.exe"
EXEC="/home/cop_nav"

if [ -f $CHECK ]; then
$EXEC
/bin/rm $CHECK
else
exit 0
fi

anonymous
()

thnx!.... большое! работает... :) учиться нам ещё и учиться!

anonymous
()
Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.