Perl - 从 Perl 调用 PHP 文件
Perl - Call PHP file from Perl
phptest.php
<?php
echo "<h2>PHP is Fun!</h2>";
echo "Hello world!<br>";
echo "I'm about to learn PHP!<br>";
echo "This ", "string ", "was ", "made ", "with multiple parameters.";
?>
perltest.cgi
#!C:\Perl\bin\perl.exe
use DBI;
use Archive::Zip;
use File::Spec::Functions qw( catfile );
use CGI;
require "header.cgi";
my $query = new CGI;
print $query->header ( );
exec('C:\php phptest.php');
我正在尝试从 perl 执行 php 文件。我得到的只是一个空白页面,没有任何错误消息。这两个文件位于同一个文件夹中。当我尝试在浏览器中 运行 php 文件时,我得到如下屏幕截图。
从CMD。
请指教我哪里做错了。
首先在你的 perl 脚本中使用 use warnings
和 use strict
,然后在命令提示符下 运行 你的 perl 脚本来检查它是否工作正常。
使用反引号运算符:
my $php = `/path/to/yourscript.php`;
phptest.php
<?php
echo "<h2>PHP is Fun!</h2>";
echo "Hello world!<br>";
echo "I'm about to learn PHP!<br>";
echo "This ", "string ", "was ", "made ", "with multiple parameters.";
?>
perltest.cgi
#!C:\Perl\bin\perl.exe
use DBI;
use Archive::Zip;
use File::Spec::Functions qw( catfile );
use CGI;
require "header.cgi";
my $query = new CGI;
print $query->header ( );
exec('C:\php phptest.php');
我正在尝试从 perl 执行 php 文件。我得到的只是一个空白页面,没有任何错误消息。这两个文件位于同一个文件夹中。当我尝试在浏览器中 运行 php 文件时,我得到如下屏幕截图。
首先在你的 perl 脚本中使用 use warnings
和 use strict
,然后在命令提示符下 运行 你的 perl 脚本来检查它是否工作正常。
使用反引号运算符:
my $php = `/path/to/yourscript.php`;