package FancyExample;

use strict;
use warnings;

use base 'Exporter';
our @EXPORT = qw( fancy_death );

use Exception::Class::OnCaller ex => {
    fields      => "data",
    description => "This exception has many bells and whistles!",
    -as         => 'throw',
    -subclass   => 'BlingError',
};

sub fancy_death {
    die throw( error => "meep", data => { stuff => 'goes here' } );
}

1;