use Digest::MD5 (); # no namespace pollution
...
if ($seenObjects{ &Digest::MD5::md5_hex($_) }++) {
...