foreach my $j (@fucntion64)
			{
			if(substr($j,0,2) eq "AU") {
			my($item,$title) = split(' ',substr($j,2),2);
			return $title."<br />";
			}