$_=$,;$,=$/;$/=$_;$_=<DATA>;print/([-_a-z_-]+)\x2eco(?:m|m?\x2e[a-z][a-z])\s/gi;
__DATA__
http://www.tesco.com http://www.mmu.ac.uk http://www.amazon.com http://www.ikea.co.uk http://plus.maths.org