use strict; use warnings; /^output/ and print while ; __DATA__ hfkjd process jhk start begin output1 output2 end process scrap hkl process khfk shoot hooter begin output3 end process