>>801
while (/<b>(.+?)<\/b>/g) {print $1,"\n"}

</b></a>ってのも名前にあげられてしまいます。