$response = finger('corbeau@execpc.com');
    unless ($response) {
        warn "Finger problem: $Net::Finger::error";
    }