#!/usr/bin/env perl

use strict;
use warnings;
use feature qw(say);
use Try::Tiny;

# say $0;

try { ...; } catch { say $_}

__END__

karls-mac-mini:playground karl$ ./bfdi533.pl
Unimplemented at ./bfdi533.pl line 10.