[Perl] Передача переменных из скрипта в cgi

А скрипт на той же машине, что и cgi?

А так - какой-нибудь WWW::Automate например.

Да. Скрипт будет располагаться на том же хосте.

Использовать такой метод не желательно использовать в данной ситуации. Скажем так: такой метод отложен на крайний случай

Ы?

http://search.cpan.org/~gaas/libwww-perl-6.03/lwpcook.pod#POST

А возможно ли указать вместо url адрес скрипта? Я если честно, не уверен.

Задам вопрос так:

#!/usr/bin/perl
# /some_dir/script1.pl (read only)
...
...
...
my $var3=$VAR1+$VAR2;
print $var3;

#!/usr/bin/perl
# /some_dir/script2.pl
...
...
...
exec ('/some_dir/script1.pl');
...
...
...

Как, если это возможно, передать передать переменные $VAR1 и $VAR2 из script2.pl в script1.pl

Сегодня что-то я повторяюсь сегодня

=]

Данный скрипт принимает из POST запроса значения ($VAR1=val1 $VAR2=val2) и формирует HTML.

Приведённые модули работают с POST запросами.

Если надо скрипту скармливать параметры из командной строки, то надо пользоваться @ARGV, разве нет?

Если в первом (read only) скрипте не предусмотрено никаких пихательных отверстий типа обработки аргументов командной строки или пользовательского ввода, то как же им что-то передашь?

А тут сказано: скрипт работает через HTTP-запросы.

Получается в скрипте 2 приблизительно так:

#!/usr/bin/perl 
# /some_dir/script2.pl

use warnings; 
use strict; 
use LWP::UserAgent; 
... 
... 
...

# Получаем результат от CGI-скрипта

my $ua = LWP::UserAgent->new;

my $req = HTTP::Request->new(POST => 'http://www.perl.com/cgi-bin/BugGlimpse'); 
$req->content_type('application/x-www-form-urlencoded'); $req->content('match=www&errors=0');

my $res = $ua->request($req); 
print $res->as_string; # Ну или что там надо сделать с результатом страницы 
... 
... 
... 

А первый скрипт - он секретный или можно на него посмотреть?

Чего-то не фурычит у меня...

use warnings; 
use strict;

my $var;

print $var if defined $var;

$ perl test.pl var=112 
$

Если CGI, значит он читает значения POST из STDIN.
Дальше думаю понятно.

А, вон оно что!

Я просто CGI не использовал никогда, только Dancer.

Спасибо за ценную информацию.

# вот и выросло поколение, да :)

*facepalm*
У топик-стартера CGI-скрипт.
CGI.pm умеет принимать параметры из консоли

Кстати, почему dancer а не mojolicious?

Как-то так получилось. Dancer же очень простой и какой-то понятный. Ну на мой вкус, я, конечно, не специалист ни по Perl, ни по программированию вообще.