2013-04-17 74 views
0

我想從perl腳本訪問現有的php會話。我可以看到PHP的示例perl,但不是PHP的perl。我最大的問題是正確訪問/ tmp目錄。我擁有所有適當的權限,但我無法找到如何捕獲會話。 我看到了所有的/ tmp/sess〜文件,但我找不到任何接近實際示例的東西來向我展示如何實現它。perl cgi不會訪問/ tmp中的php會話數據

#!/usr/bin/perl 
# Script to launch the vncserver service and capture output 
# Runs, displays $pid to STDOUT, but opened 
# files are empty. 

use strict; 
use warnings; 
use CGI qw(); 
use CGI::Session qw(); 

my %vars = (
    COOKIE_NAME => '_SESSION', 
    SESSION_DIR => '/tmp', 
); 
my $q = CGI->new; 
print $q->header; 
CGI::Session->name($vars{COOKIE_NAME}); 
my $session = CGI::Session->new('id:md5', $q, {Directory=>$vars{'/tmp/'}}); 

print $session->header(-type => 'text/plain'); 


my $system_name = $session->param("_SESSION_ATIME"); 
print $system_name->output(); 

回答

3

會話數據可以存儲的方式很多。 PHP使用一種方法。 CGI::Session使用另一個。您不能使用CGI::Session來閱讀PHP會話。改爲使用PHP::Session