Hola, como están?, mirando la Pagina de Chema Alonso, vi esta tool que es muy buena en auditoria de Whatsapp, es decir descubrir el Nro de Telefono de alguien que este en la misma red adjunto Nota:

http://www.elladodelmal.com/2014/03/como-saber-el-whatsapp-de-alguien-con.html

El autor colgó la herramienta en los repositorios de GitHUb, pero elimino la función de Sniffer. Alguien que conozca sobre Perl y como programar algo asi, podría ser tan amable de completar el código?

https://github.com/deepakdaswani/whatsapp_discover

Muchas gracias.