У меня есть сценарий Perl (автономная программа), который содержит некоторые нижние индексы, которые я хотел бы снова использовать в других сценариях. Из-за ограничений среды выполнения, я не могу переместить функции в общее .pm
файл.
Действительно ли возможно дифференцироваться, был ли скрипт запущен как автономная программа, или это было require
редактор /do
редактор другим сценарием?
Единственная вещь, которую я мог найти, состояла в том, чтобы использовать caller
на верхнем уровне: автономная программа не имеет никакой вызывающей стороны в то время как когда require
редактор caller
шоу, кто действительно загружал модуль. Есть ли какое-либо лучшее решение?