my $z = new Pineapple 'fresh'; # croaks 'You really wanted Pineapple->new at blurp.pm:13'
}
}
+ try { ... }; # warns
+
no indirect ':fatal';
if (defied $foo) { ... } # croaks, note the typo
=item *
-If the key/value pair C<< hook => $hook >> comes first, C<$hook> will be called for each error with the object name as C<$_[0]>, the method name as C<$_[1]>, the current file as C<$_[2]> and the line number as C<$_[3]>.
+If the key/value pair C<< hook => $hook >> comes first, C<$hook> will be called for each error with a string representation of the object as C<$_[0]>, the method name as C<$_[1]>, the current file as C<$_[2]> and the line number as C<$_[3]>.
+If and only if the object is actually a block, C<$_[0]> is assured to start by C<'{'>.
=item *
Bram, for motivation and advices.
+Andrew Main and Florian Ragwitz, for testing on real-life code and reporting issues.
+
=head1 COPYRIGHT & LICENSE
Copyright 2008-2009 Vincent Pit, all rights reserved.