#!/usr/bin/env perl

use strict;
use warnings;
use Try::Tiny;

try {
    die qq(Goodbye World!);
}
catch {
    warn $_;
};

__END__