Как в перле используя Net::Ping..(+)

Привет ВСЕМ!

Написал скрипт, который пингует компы в локалке через опр время (чтобы определять их наличие)
Но, ещё нужно бы знать время отклика при пиинге.
А как его получить...???
Для пинга использую
use Net::Ping;
$pong = Net::Ping->new( $>? "udp":"icmp" );
if ($pong->ping($_)) {...}

А как тут выцепить время отклика..хелп плизз;-)