$page =~ m%<noframes>.*?<a href *= *"(http://(?!netscape.com)(?!microsoft.com)(?:\w+\.)(?!netscape.com)(?!microsoft.com)[^"]+)"%is;