dumpcpanurls | perl -le 'do{s#^\w+p://([^/]+).*#$1#;print} for()' \ | xargs --max-args 1 ping -c 2