如何使用批处理文件在Windows下为Perl程序创建快捷方式？

Question

我试图从最终用户"隐藏"我的一些Perl程序,以使它们更容易.我正在尽我所能让他们远离命令提示符.程序本身有一个在Perl/Tk中设计的GUI,因此他们不必担心命令提示符.

我可以写出一个快速的批处理文件,其中包含以下内容:

START perl 'C:\[some path here]\myscript.pl'

使用START启动程序,Perl解释器作为我的程序,以及我的Perl脚本的路径/名称作为参数？

我是否必须指定在哪里找到perl或者Windows只知道因为perl在计算机的PATH变量中？

Answer 1

我有一个完全邪恶的VBS脚本和批处理文件,用Strawberry Perl Portable来处理这种事情.VBS脚本运行批处理文件而不生成cmd窗口.批处理文件可以在其中运行,perl.exe与之相关,并运行perl脚本.在这种情况下,它是运行Catalyst服务器,但也可以用于其他任何事情.

这是vbs(不寒而栗):

Set fso = CreateObject("Scripting.FileSystemObject")
Set WshShell = CreateObject("WScript.Shell")
WshShell.Run chr(34) &  fso.GetParentFolderName(wscript.ScriptFullName) & "\perlshell.bat"& Chr(34), 0
Set WshShell = Nothing

这是批处理脚本(只是略微颤抖):

echo off
set bindir=%~dp0
set perlpath=%bindir%perl\bin
set buildpath=%bindir%\bin
set PATH=%PATH%;%perlpath%;%buildpath%
"%perlpath%\wperl.exe" "%bindir%MyPhp\script\myphp_server.pl" -p 35900