note
ikegami
<blockquote><i><c>
# perl -e 'use My::Module::Account qw(_GenerateAccountSummary); _GenerateAccountSummary();'
Undefined subroutine &main::_GenerateAccountSummary called at -e line 1.
</c></i></blockquote>
Three possibilities:
<ol>
<li>
<p><c>&My::Module::Account::import</c> doesn't exist and <c>My::Module::Account</c> doesn't inherit a method named <c>import</c>.
<p>Test:
<c>
perl -wle'use My::Module::Account qw(_GenerateAccountSummary); print My::Module::Account->can("import") || "no"'
</c>
<li>
<p>The <c>import</c> does not create a sub named <c>_GenerateAccountSummary</c> in the caller's namespace in response to the call.
<p>Test:
<c>
perl -wle'use My::Module::Account qw(_GenerateAccountSummary); print *{$::{_GenerateAccountSummary}}{CODE} || "no"'
</c>
<li>
<p><c>_GenerateAccountSummary</c> is successfully exported, but it has not been defined.
<p>Test:
<c>
perl -wle'use My::Module::Account qw(_GenerateAccountSummary); print defined(&_GenerateAccountSummary) ? "yes" : "no"'
</c>
</ol>
<p>The first to output "no" indicates the cause.
779726
780485