Select Code to Download

c:\> perl -n -e "print $last, $_ if /xyzdf$/ && $last; $last=  /^xyzdf
+/ ? $_ : ''" file1>file2

abc
xyzdf def
...
klm
xyzdf nop
qrs xyzdf

xyzdf def
hij xyzdf
xyzdf nop
qrs xyzdf