sub func {
    print $_, ' ' for @_;
    print "\n";
    $_[2];
}