if (!grep /home/, $words[$x]) { print $words[$x]; }