Передача переменных сеанса из php в perl

Question

Мне нужно передать переменные сеанса php из моей php-формы в perl-скрипт и наоборот, чтобы поля форм могли сохранять свои значения.

form.php

<?php session_start(); 
if (isset($_POST['submit'])){ 
    $post_arr = $_POST; 

    $expire = 8*3600; 
    setcookie("Cookie_Info", serialize($post_arr), time()+$expire); 
    } 

if (isset($_COOKIE['Cookie_Info'])) { 
    $data = unserialize($_COOKIE['Cookie_Info']); 
} else { 
    $data = array(
      'from' => '', 
       'area_html' => '' 
    ); 

     } 

.....

<form name="sendForm" method="post" action="test.cgi" > 
<tr><td> from: </td> 
    <td><input type="text" name="from" value="<?php echo $data->from; ?>"/></td> 
</tr> 

Мой вопрос, как я мог бы сделать это в PERL стороне

Answer 1

Ответ был прост, в perl:

use CGI qw/:standard/;   
use CGI::Cookie; 
%cookies = CGI::Cookie->parse($ENV{COOKIE}); 

Answer 2

Вы искали уже? Я не думаю, что так ...

Passing variables from PHP to PERL

Вы должны использовать Exec:

<?php 
$var1='high'; 
exec('C:/xampp/htdocs/WORK/hello.pl'.' '.EscapeShellArg("$var1"),$output); 
echo ($output); 
?> 

Другие ссылки:

http://forums.devshed.com/php-development-5/passing-arrays-from-php-to-a-perl-script-run-as-35600.html