import()是Perl中的一个特殊方法名。每当您对一个模块执行use操作时，Perl都会在该模块中查找一个名为import()的子例程，如果找到了，它就会运行。
这是Exporter最常用的技巧。这意味着在模块中有一个名为import()的方法，而您不希望在加载模块时被调用，这是一个非常糟糕的主意。它会让您在每个回合都与Perl战斗。
请参阅perldoc -f import以取得更多信息：

导入列表

没有内置的import函数。它只是一个普通的方法（子例程），由希望将名称导出 * 到另一个模块的模块定义（或继承）。use函数调用所用包的import方法 *。另请参阅use、perlmod和Exporter。
您找到的“变通方法”也不是一个很好的主意。您实际上是从一个名为www.example.com的文件中加载一个名为My：Foo的模块Foo.pm如果文件名和包名不匹配，Perl会感到非常困惑。

在我看来，您似乎看错了 Camel 的一头。您的问题不是由于import“特殊”而引起的，而是由于不知道use实际上是做什么的。根据perldoc use，use Module“完全等价于”

BEGIN { require Module; Module->import( LIST ); }

当您使用use时，* 您是在告诉Perl调用Module的import方法。* 就这么简单。
当然，Perl就是Perl，import方法可能有某种方法来判断它是否作为use的一部分被调用，如果是这样的话，就立即返回，但这只会增加不必要的复杂性。（例如，import_file、import_record等，取决于您实际导入的内容）将是一个更好的解决方案。

import在两个方面是特殊的：
除非use被显式地给定了一个空的导入列表（例如use Foo ();），否则import将在编译时作为类方法被调用，并传递任何给定的导入列表参数use。
如果import作为示例或类方法调用（无论是由use隐式调用还是显式调用），并且不存在这样的方法，则将返回一个空列表，而不是引发Can't locate object method错误或调用AUTOLOAD。
如果它在今天实现，它可能会被称为IMPORT。
以上所有内容也适用于unimport（但使用no而不是use）。
更新：有些人链接到文档，其中说什么use是“完全等同的”，然后谎言。
它完全等同于BEGIN { require Module; Module::->VERSION(...); Module::->import(...) }，只是如果没有指定版本，则省略VERSION调用;如果给出了明确的空列表，则省略import调用（如后面的文档所述）。
(Also注意Module-〉import（如果存在，则调用Module（）函数，然后对返回的任何内容调用import方法）与Module：：-〉import或'Module'-〉import（对Module类的直接类方法调用）之间的细微区别。

import是一个保留的关键字。当你use一个模块时，它的import方法将被调用，参见the documentation。
恐怕你不能改变它。把你的方法重命名为其他的不是特殊关键字的东西。