1 files changed, 3 insertions, 0 deletions
diff --git a/attr.pl b/attr.pl
index 8a53889..18ea6b0 100644
--- a/attr.pl
+++ b/attr.pl
@@ -317,6 +317,9 @@ my $obj = Foo->new();
 p $obj;
 
 say $obj->stuff(2);
+
+eval { say $obj->stuff('wrong') } or say $@;
+
 say $obj->stuff_timed({from=>10,to=>20},5);
 say $obj->stuff_timed({},3);