#!perl
use warnings;
use strict;

use Function::Parameters;

fun bad_1($x, @y, $z) {}

'ok'