kernel/timeconst.pl line 373.

错误提示2:

<span style="font-size:18px;"><code class="hljs vhdl has-numbering">Can<span class="hljs-attribute">'t</span> <span class="hljs-keyword">use</span> <span class="hljs-attribute">'defined</span>(@<span class="hljs-keyword">array</span>)' (Maybe you should just omit the defined()?) at kernel/timeconst.pl line <span class="hljs-number">373.</span></code></span>

修改文件vim kernel/timeconst.pl +373
删除

<span style="font-size:18px;"><code class="hljs ruby has-numbering"><span class="hljs-variable">@val</span> = @{<span class="hljs-variable">$canned_values</span>{<span class="hljs-variable">$hz</span>}};
<span class="hljs-keyword">if</span> (!<span class="hljs-keyword">defined</span>(<span class="hljs-variable">@val</span>)) {
<span class="hljs-variable">@val</span> = compute_values(<span class="hljs-variable">$hz</span>);
}</code></span>

修改为

<span style="font-size:18px;"><code class="hljs ruby has-numbering"><span class="hljs-variable">$cv</span> = <span class="hljs-variable">$canned_values</span>{<span class="hljs-variable">$hz</span>};
<span class="hljs-variable">@val</span> = <span class="hljs-keyword">defined</span>(<span class="hljs-variable">$cv</span>) ? @<span class="hljs-variable">$cv</span> <span class="hljs-symbol">:</span> compute_values(<span class="hljs-variable">$hz</span>);</code></span>

参考资料

删除
@val = @{$canned_values{$hz}};
if (!defined(@val)) {
@val = compute_values($hz);
}
output前面加入
$cv = $canned_values{$hz};
@val = defined($cv) ? @$cv : compute_values($hz)