perl -pi.bak -e 's/(^alert ip 63.251)/#$1/;'