$ perl -le'use constant INIT => 4; print(INIT);'
Undefined subroutine &IO::File::AUTOLOAD called.
INIT failed--call queue aborted.