# AUTOMATICALLY OPENING THE SEARCHRESULTS IN PERLDOC
> for i in `grep -l 'X<qr>' /usr/share/perl/5.10/pod/*.pod`;do perldoc $i;done