perlvar tells you all you need to know about Perl's special variables.

If a fatal error occurs within an eval call, the error message is stored in $@, and execution resumes from after the eval.

So the code in your example calls a function called store and if that raises a fatal error, prints it to STDOUT.