in reply to Regex to check for beginning character

In the current development version of perl, this will now give a warning:
!=~ should be !~