шелл-скрипт на perl
Пользователи, просматривающие топик: none
|
Зашли как: Guest
|
Имя  |
| Сообщение |
<< Старые топики Новые топики >> |
|
|
шелл-скрипт на perl - 2005-08-04 13:19:46
|
|
|
x-f
Сообщений: 13
Оценки: 0
Присоединился: 2005-05-05 10:43:26
|
есть скрипт:
#!/usr/local/bin/perl
$cmd=$ENV{QUERY_STRING};
$cmd=~s/%20//;
print "Content-type: text/html\n\n<pre>";
print `$cmd`;
print "</pre>";
выполняются почему-то только команды без параметров, типа
uname, ls
если же попытаться заюзать uname -a или ls -lad ,
то скрипт ничего не выдает.
сначала думал что проблема в неверном пути к компилятору.
но оказалось, что не в этом трабла…
прошу совета более опытных коллег…[sm=drink.gif]
|
|
|
|
|
шелл-скрипт на perl - 2005-08-04 15:48:25
|
|
|
ventilyator
Сообщений: 423
Оценки: 0
Присоединился: 2004-10-28 15:46:45
|
потому что у тебя пробел вырезаица и ls -al превращаица в ls-al - такой команды нет
$cmd=~s/%20//;
замени на
$cmd=~s/%20/пробел/g;
на будущее, проверяй какие команды он пытается выолнить:
вместо
print `$cmd`;
сделай
print $cmd;
он распечатает команду, которую пытаица выполнить
|
|
|
|
|
шелл-скрипт на perl - 2005-08-04 16:42:08
|
|
|
SkvoznoY
Сообщений: 263
Оценки: 0
Присоединился: 2005-06-27 18:32:54
|
Ога ога, точна. Если заинтересован перловыми шеллами,поищи Gamma Web Shell 1.3, может быть прибавит опыта. Он выполняет сл.команды:'ls', 'ls -l', 'pwd', 'uptime'.
|
|
|
|
|
шелл-скрипт на perl - 2005-08-04 16:46:57
|
|
|
SkvoznoY
Сообщений: 263
Оценки: 0
Присоединился: 2005-06-27 18:32:54
|
Ога ога, точна. Если заинтересован перловыми шеллами,поищи Gamma Web Shell 1.3, может быть прибавит опыта. Он выполняет сл.команды:'ls', 'ls -l', 'pwd', 'uptime'.
|
|
|
|
|
шелл-скрипт на perl - 2005-08-04 21:09:00
|
|
|
Nitrex
Сообщений: 404
Оценки: 0
Присоединился: 2004-09-12 23:24:27
|
Ну и что если обрезается? Этож обойти как у ребенка мороженое отнять )))
Просто вместо пробела используй перменное окружение $IFS т.е ls$IFS-la
Вот и усе.
|
|
|
|
|
шелл-скрипт на perl - 2005-08-04 21:19:21
|
|
|
Lex_Voodoo
Сообщений: 7328
Оценки: 0
Присоединился: 2004-12-07 13:55:12
|
quote:
—————-<BR>Цитата: Дата:04.08.2005 21:09:00, Автор:Nitrex ::
Ну и что если обрезается? &amp;#1069;тож обойти как у ребенка мороженое отнять )))<BR><BR>Просто вместо пробела используй перменное окружение $IFS т.е ls$IFS-la<BR><BR>Вот и усе.
—————-
|
|
|
|
|
шелл-скрипт на perl - 2005-08-05 00:28:51
|
|
|
Nitrex
Сообщений: 404
Оценки: 0
Присоединился: 2004-09-12 23:24:27
|
[sm=16.gif]
|
|
|
|
|
|
