my $foo = $x; foobar($x, $y);