I'm just asking, because your question makes me feel that there are other questions to be answered before you start a perl implementation on your own.

You wrote:

My first problem is that i have no port to connect to.

Do you mean a ICMP-ping or a UDP-ping? Answering this question will bring you a step further.

Another option for you is: Ask a more specific question concerning a part of Net::Ping's sources you don't understand. I'm sure, Monks will help you.

Best regards
McA