#!/usr/bin/perl
use warnings;
use strict;

use experimental 'signatures';
use Syntax::Construct qw{ // };

sub show ($arg) { $arg // 'undef' }

use Test::More;
use Test::Exception;

throws_ok { show() } qr/Too few arguments/;

done_testing();