my( $foo, $bar ) = @_;