sub test {
    my $i = shift // die("Missing argument i.");
} # test