perl -ln -e 'print if /^\s*param\s*=/ && s/^\s*param\s*=\s*|\x{27}|#.*//g' testfile