#!perl -n 
if(/RS/) { print }