Select Code to Download

perl -lne '$s += /^\w+\047?\w+\s+\w+\047?\w+\s/ }{ print $s' file.txt

perl -lne '$s += /^\w+(?:\047\w+)?\s+\w+(?:\047\w+)?/\s/ }{ print $s' 
+file.txt