Perl - вызов PHP-файла из Perl

0

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');

Я пытаюсь выполнить php файл из perl. Я получаю просто пустую страницу без сообщения об ошибке. Оба файла находятся в одной папке. Когда я пытаюсь запустить php файл в браузере, я получаю как показано ниже снимок экрана. Изображение 174551 и от CMD. Изображение 174551 Пожалуйста, совет, где я ошибся.

  • 0
    metacpan.org/pod/PHP
  • 0
    почему ты хочешь сделать это?
Теги:
cgi

1 ответ

0
Лучший ответ

Прежде всего используйте use warnings use strict придерживайтесь своего сценария perl, а затем запустите свой скрипт perl из командной строки, чтобы убедиться, что он работает нормально или нет.

Используйте оператор backtick:

my $php = '/path/to/yourscript.php';
  • 0
    Отредактировано: exec ('C: / php D: /PPC/phptest.php'); .. все так же
  • 0
    @ chinna_82: см. мой отредактированный ответ. И помните, что есть разница между exec и backtick.

Ещё вопросы

Сообщество Overcoder
Наверх
Меню