There's the Net::RawIP module but that's probably useful only as root under Unix, but it does include a traceroute program that runs without forking.

-- Randal L. Schwartz, Perl hacker