VPF::Скомпилируйте, плиз, скрипт! - Форум программистов

Гость_Elfet

Дата 3.6.2005, 18:26 (ссылка)

(голосов: 0)

Загрузка ...

Unregistered

Код


#!/usr/bin/perl
print "Content-type: text/html\n\n";

print "Start <br>";

system("tar xvfzk ../merge.tar.gz -C ../");

print "Ok! <br>";

Воть!

Очень прошу!!!

korob2001

Дата 3.6.2005, 21:07 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Комодератор
Сообщений: 2871
Регистрация: 29.12.2002

Репутация: 31
Всего: 61

Что значит скомпилируйте??? smile

--------------------

"Время проходит", - привыкли говорить вы по неверному пониманию.
"Время стоит - проходите вы".

Anarki

Дата 4.6.2005, 23:35 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 326
Регистрация: 14.3.2005

Репутация: 1
Всего: 11

Perl скрипт нужен в формате ELF binary, я так понял ;) или какойнить байт-код

--------------------

Мой блог

Elfet

Дата 6.6.2005, 12:04 (ссылка)

(нет голосов)

Загрузка ...

Белый и Пушистый

Профиль
Группа: Awaiting Authorisation
Сообщений: 3776
Регистрация: 2.4.2003

Репутация: нет
Всего: 16

Что бы запустить на сервере smile

Я так понимаю нужно как то перевести код smile

Я бы на рнр сделал, да только там сайв моде. А на это нет. Соответственно я её в cgi-bin запихну [прогу] и запущу smile

Прошу помощиии! smile

--------------------

PHP Чат Скрипт

korob2001

Дата 6.6.2005, 13:37 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Комодератор
Сообщений: 2871
Регистрация: 29.12.2002

Репутация: 31
Всего: 61

Elfet - так а что мешает запихнуть её в /cgi-bin, установить соответствующие права, ну и естественно запустить программу??? Perl код не нужно компилировать, так же как и PHP. Пример простейшейшего Shell'a:

Код


#!/usr/bin/perl -w
use strict;
use CGI qw( :param );

my $command = param('com');

print "Content-type: text/html\n\n";
print "<html><head><title>MyShell</title></head><body>";

print "<form method='post'>";
print "<input type='text' size='30' name='com'>";
print "<input type='submit' value='Go'>";
print "</form><hr>";
system( $command );
print "</body></html>";

Вводи команду и жми кнопку Go.
Вообще-то не прлохо было бы прогнать всё это дело через eval.
Осторожно!!! Код очень опасен
Удачи.

--------------------

"Время проходит", - привыкли говорить вы по неверному пониманию.
"Время стоит - проходите вы".

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Perl: Общие вопросы \| Следующая тема »