Help for this page
if (m/^###|^\s*$/s) {
if (m/^###|^\s*\$/s) {
unless (m{(^SIP\/2\.0 \d\d\d|^[A-Z]{3,6} ).*(Call-ID: [\S]{25,80}) +[^ ]+: .*}s) { print "No match: $_\n"; next; }