dongtaotao19830418 2012-02-20 10:09
浏览 29
已采纳

如何通过php和perl打开应用程序?

I am trying to print generated forms / receipts through PHP (the printers will be installed on the server, I am not attempting to print to a user's local printer). I have decided to try the following methodology:

IN PHP:

  1. Generate a PDF file and save it on the server.
  2. Call a perl script to print said PDF file.

IN perl:

  1. Use system() to "open" Reader and print the given PDF silently.

What works:

  • I can generate PDFs in PHP.
  • I can call a perl script.
    • If the script has errors, they report to the browser window. ie: If I purposely change file paths it fails, and reports the appropriate reason.
  • functions such as printf seem to work fine as the output displays in the browser.
  • The exact same perl script (with the "non-functioning" line mentioned below) works properly when executed from the command line or the IDE.

What doesn't work:

  • In perl: system('"C:\\Program Files (x86)\\Adobe\\Reader 10.0\\Reader\\AcroRd32.exe" /N /T "C:\\test.pdf" 0-XEROX');

What happens:

  • NOTHING! I get no errors. It just flat out refuses to open Adobe Reader. All code below this line seems to run fine. It's like the function is being ignored. I am at a loss as to why, but I did try a few things.

What I've tried:

  • Changed permissions of the AcroRd32.exe to Everyone - Full Control.
  • Output the $? after the system() call. It is 1, but I don't know what 1 means in this case.
  • Verified that there are no disable_functions listed in php (though I think this is unrelated as shell_exec seems to be working, since some of the perl code is ran).
  • Various other configurations that at least got me to the point where I can confirm that PHP is in fact calling the perl script, it just isn't running the system() call.

Other info:

  • Apache 2.2.1.7
  • PHP 5.35
  • Perl 5.12.3 built for MSWin32-x86-multi-thread
  • WampServer 2.1

I'm at a loss here, and while it seems like this is an Apache / permissions problem, I cannot be sure. My experience with Apache is limited, and most of what I find online is linux commands that don't work in my environment.

展开全部

  • 写回答

1条回答 默认 最新

  • doutan8601 2012-02-20 11:37
    关注

    Try this:

    my @args = ('C:/Program Files (x86)/Adobe/Reader 10.0/Reader/AcroRd32.exe');
    if (system(@args) != 0) {
        # Can't run acroread.  Oh Noes!!!
        die "Unable to launch acrobat reader!
    ";
    }
    

    The thing about system() is that it does two different things depending on the number and type(s) of argument it gets. If the argument is an array or if there are multiple arguments, Perl assumes the first is the program to run with the rest as its arguments and it launches the program itself.

    If, however it's just one string, Perl handles it differently. It runs your command-line interpreter (typically CMD.EXE on Windows) on the string and lets it do what it wants with it. This becomes problematic pretty quickly.

    Firstly, both Perl and the shell do various kinds of interpolation on the string (e.g. replace '//' with '/', tokenize by space, etc.) and it gets very easy to lose track of what does what. I'm not at all surprised that your command doesn't work--there are just so many things that can go wrong.

    Secondly, it's hard to know for sure what shell actually gets run on Windows or what changes Perl makes to it first. On Unix, it usually doesn't matter--every shell does more or less the same with simple commands. But on Windows, you could be running raw CMD.EXE, GNU Bash or some intermediate program that provides Unix-shell-like behaviour. And since there are several different ports of Perl to Windows, it could well change if you switch.

    But if you use the array form, it all stays in Perl and nothing else happens under the hood.

    By the way, the documentation for system() and $? can be found here and here. It's well worth reading.

    本回答被题主选为最佳回答 , 对您是否有帮助呢?
    评论
编辑
预览

报告相同问题?

悬赏问题

  • ¥15 KeiI中头文件找不到怎么解决
  • ¥15 QT6将音频采样数据转PCM
  • ¥15 本地安装org.Hs.eg.dby一直这样的图片报错如何解决?
  • ¥15 下面三个文件分别是OFDM波形的数据,我的思路公式和我写的成像算法代码,有没有人能帮我改一改,如何解决?
  • ¥15 Ubuntu打开gazebo模型调不出来,如何解决?
  • ¥100 有chang请一位会arm和dsp的朋友解读一个工程
  • ¥50 求代做一个阿里云百炼的小实验
  • ¥15 查询优化:A表100000行,B表2000 行,内存页大小只有20页,运行时3页,设计两个表等值连接的最简单的算法
  • ¥15 led数码显示控制(标签-流程图)
  • ¥20 为什么在复位后出现错误帧
手机看
程序员都在用的中文IT技术交流社区

程序员都在用的中文IT技术交流社区

专业的中文 IT 技术社区,与千万技术人共成长

专业的中文 IT 技术社区,与千万技术人共成长

关注【CSDN】视频号,行业资讯、技术分享精彩不断,直播好礼送不停!

关注【CSDN】视频号,行业资讯、技术分享精彩不断,直播好礼送不停!

客服 返回
顶部