The XPath expression in your last line should be './/atom:id'. Note the extra period, with it the expression searches for entries under the second argument, otherwise it searches in the entire document.

You probably have the same problem with XML::XPath, but I'd recommend sticking to XML::LibXML, it is more powerful, more efficient and better maintained.