将会话变量从php传递到perl

我需要将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' => ''
    );

        }

---

您已经搜索过了吗？我不这么认为


您需要使用exec：

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



其他链接：

答案很简单，在perl方面：

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

…你的问题是什么？我的问题是如何做到这一点：我已经搜索了DI，我可以将变量从php传递到perl，这不是我的问题，我的问题是如何传递Cookie/sessions变量。。。
use CGI qw/:standard/;         
use CGI::Cookie;
%cookies = CGI::Cookie->parse($ENV{COOKIE});