$ACCUMULATOR
$^A

write() 累加器目前的值，用於 format() 行。格式包含 formline() 呼叫，將其結果放入 $^A。呼叫其格式後，write() 會列印出 $^A 的內容並清空。因此，除非您自己呼叫 formline() 並查看它，否則您永遠不會真正看到 $^A 的內容。請參閱 perlform 和 "formline PICTURE,LIST" in perlfunc。