windows - 如何使用批处理文件在 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