special character question

http://www.perlmonks.org?node_id=1021543

dicty has asked for the wisdom of the Perl Monks concerning the following question:

Hi Monks,

In the code below, what does "$@" mean?

eval { store(\%hash, "$dir/pre_hash"); };

print "Error writing to file: $@\n" if $@;

Thanks!

Dicty

Comment on special character question

Replies are listed 'Best First'.
Re: special character question by tobyink (Canon) on Mar 03, 2013 at 23:25 UTC
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. `package Cow { use Moo; has name => (is => 'lazy', default => sub { 'Mooington' }) } say Cow->new->name`	[reply] [d/l] [select]
Re: special character question by choroba (Cardinal) on Mar 03, 2013 at 23:26 UTC
See Error Variables. $@ is the error (or exception raised) in the last eval. لսႽ† ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ	[reply]
Re: special character question by vinoth.ree (Monsignor) on Mar 04, 2013 at 05:09 UTC
You could have tried on "special variable" search here Perl Special Variables Quick Reference	[reply]

Back to Seekers of Perl Wisdom