perl -e'while(<>){print if /^(GET|POST)/../^\r?$/;}' <58143.txt