$rrow_test =~ s/$rex[0]/$rex[1]/ig;