package Foo;

# your posted code here

package main;

my $foo = Foo->new;
$foo->{_error_excerpt} = "hi";
say $foo->error_excerpt(undef); # No Error Excerpt.
say $foo->error_excerpt(1);     # hi