Question

我知道％~dp0，它代表包含批处理脚本的完全展开的目录，但我要找的是：

一种从Perl调用批处理脚本的方法，允许我在不修改的情况下使用批处理脚本，并使其中的所有目录与批处理脚本位置相关
我可以在批处理脚本中放入一个语句，该脚本是一个标志，用于将批处理脚本的位置用作所有目录的起点

我目前正在Perl中使用此方法调用批处理脚本：

`"../run.bat" -f $ARGV[$#ARGV]`;

然后捕获输出并对其进行处理。

Answer 1

我不太清楚我理解你的问题。但是，为什么不简单地将perl脚本中的当前目录更改为批处理脚本的目录，然后调用批处理脚本？

Answer 2

使用pushd和popd。添加行

@pushd %~dp0

到批处理脚本的开头。这会将工作目录更改为批处理文件的基目录。为了完整起见（如果批处理文件将由其他批处理文件使用），您应该添加

@popd

最后。

Answer 3

这是一个bat脚本，用于启动相对于.bat脚本的位置中包含的催化剂服务器perl脚本：MyPhp / script /

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

这是一个VBS脚本，可以在不创建cmd窗口的情况下启动此相同的脚本：

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

非常可怕的东西，但它有效

有没有办法让Windows shell脚本执行相对于其位置的所有内容而不是从中调用的位置？

3 个答案: