I don't know of a Perl module, but you can try parsing the output of 'dmesg' and/or 'lspci' depending on what you're trying to detect. Alternately, if you're looking for a specific device you might be able to probe /proc or /dev for the appropriate interface.

-sam