my @look_for = ($name,$nerd,$noodle,$froodle,);
foreach my $item (@look_for) {
$item =~ s/$i_seek/ /g;