(not ($var =~ s/H/W/))