perl -ne "blah" filename #### perl -ne "print qq/$1 $2 $3\n/ if (/Turn.*?speaker=(\S+)\s+startTime=(\S+)\s+endTime=(\S+)/)" input_file > toto.xxx #### perl -c -ne "print qq/$1 $2 $3\n/ if (/Turn.*?speaker=(\S+)\s+startTime=(\S+)\s+endTime=(\S+)/)" -e syntax OK