sub foo {
    args 
        my $x, 
        my $y ="default", 
        name => my $name ="def2";

    ... #body

}