> > > > $domain =~ m/((\w+)\.(\w+)$)/; > > > my($dom) = $URI =~ m{://([^/:]+)}; > > What I was trying to get was just the domain without any > subdomains, > > ie what you would register with a registrar > > Ah. Sorry, I misunderstood. > Nothing comes to mind off the top of my head.
Oh well, thanks anywho. I think I'll try a different approach and not worry about getting the domain via parsing. > > __________________________________________________ > Do you Yahoo!? > Yahoo! Shopping - Send Flowers for Valentine's Day http://shopping.yahoo.com -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]