my var $x;
my var $y,

if (my $b = &test) {exit($x,$y)};
if (my $c = &test) {exit($x,$y)};
if (my $h = &test) {exit($x,$y)};

sub exit {
my $x = shift;
my $y = shift;

}

sub test{
return somethig;
}