sub myname {
	my $name = "bill";
}