perl -ne ' if(/EventInfo>/){$p=0} if(/RequestId="321150454"/) {print $ARGV; print " "; print; $p=1;next}print if$p' sample.xml