Testing perl version of ping test and parsing