In Perl, $^A or $ACCUMULATOR is a magic variable containing the current value of the write accumulator for format lines.

See Perl for a list of all magic variables in Perl.