sub foo
{
	my ($foo, @foo, %foo);
	# now, within this lexical scope, are these names related
	return $foo;
}