在Perl中，可以使用use lib指令来设置搜索模块的当前路径。use lib指令将指定的路径添加到Perl库搜索路径的前面。
下面是一个示例，展示了如何设置搜索模块的当前路径：
use lib './path/to/modules';
上述代码将把"./path/to/modules"目录添加到Perl库搜索路径中，使得Perl可以在该目录下搜索并加载模块。
另外，还可以使用-I命令行参数来设置搜索模块的当前路径。例如：
perl -I ./path/to/modules script.pl
上述命令会在运行Perl脚本"script.pl"时，将"./path/to/modules"目录添加到Perl库搜索路径中。