Perl：未定义的子程序＆amp; main

Question

我的一位非开发者朋友就此问题向我求助。我是一名Windows开发人员，我对Perl以及脚本语言一无所知。我试图搜索问题，但找不到解决方案。有没有人可以告诉我这里的问题是什么以及如何解决它。

单击按钮后出错：

Undefined subroutine &main::quote_javascript called at /usr/libexec/webmin/chooser.cgi line 192.

第192行是：

$link = "<a href=\"\" onClick='fileclick(\"".&quote_javascript("$dir$f")."\", $isdir); return false'>";

Answer 1

实际触发错误的代码格式为

... quote_javascript(...) ...

您正在调用名为quote_javascript的子（在当前包中main）。没有名为quote_javascript的子组（在当前包中，main）。