embperl - Использование IPC::Open3 для вызова wkhtmltopdf. STDIN Не работает

Question

embperl - Использование IPC::Open3 для вызова wkhtmltopdf. STDIN Не работает

Изнутри embperl я пытаюсь вызвать wkhtmltopdf с модулем IPC::Open3.

Я получаю вывод (благодаря ikegami) из wkhtmltopdf, но никакой ввод не идет в wkhtmltopdf.

Это связано с этим вопросом: perl / embperl - IPC::Open3

Вот код:

[-
  use warnings;
  use strict;
  use IPC::Open3;
  use POSIX;
  use Symbol;

  my $cmd = '/usr/local/bin/wkhtmltopdf - -';

  my $pdf = '';

  my $string = '<!DOCTYPE html>
  <html>
    <head>
      <title>Hello World</title>
     </head>
     <body>
       Hello World!!!
     </body>
     </html>';

  my $fhOUT = gensym();
  open($fhOUT, '>', '/dev/null') or die $!; 
  dup2(fileno($fhOUT), 1) or die $! if fileno($fhOUT) != 1;
  local *STDOUT;
  open(STDOUT, '>&=', 1) or die $!;

  my $pid = open3(*HIS_IN, *HIS_OUT, *HIS_ERR, $cmd)  or die "could not run cmd : $cmd : $!\n";

  print HIS_IN $string;
  close(HIS_IN);

  while( <HIS_OUT> ) {
    $pdf .= $_;
  }


  waitpid($pid, 0 ) or die "$!\n";
  my $retval =  $?;
  # print "retval-> $retval<br />\n";

  $http_headers_out{'Content-Type'}         = "application/pdf";
  $http_headers_out{'Content-Disposition'}  = "attachment; filename=pdfTest.pdf";

  $escmode = 0;
-]
[+ $pdf +]

0

perl stdin wkhtmltopdf ipcopen3 embperl

Источник

user1171852 23 май '14 в 21:06

1 ответ

Другие вопросы по тегам perl stdin wkhtmltopdf ipcopen3 embperl

user589924 26 май '14 в 00:07 2014-05-26 00:07 · Answer 1 · 2014-05-26 00:07

Та же идея для STDIN, но fd 0 вместо 1.

 open(my $fhIN, '<', '/dev/null') or die $!;
 dup2(fileno($fhIN), 0) or die $! if fileno($fhIN) != 0;
 local *STDIN; open(STDIN, '<&=', 0) or die $!;

 open(my $fhOUT, '>', '/dev/null') or die $!;
 dup2(fileno($fhOUT), 1) or die $! if fileno($fhOUT) != 1;
 local *STDOUT; open(STDOUT, '>&=', 1) or die $!;

 my $pid = open3(
    local *HIS_IN,
    local *HIS_OUT,
    '>&STDERR',
    $cmd
 );

 ...

Это предполагает, что fd 0 и 1 закрыты, как и здесь.