$temp =~ s/$pattern\w{6}//i;