#!perl
use warnings;
use strict;
use Function::Parameters;
fun bad_1($x, @y, $z) {}
'ok'