Re: Benchmarking "Are all these characters in this sentence?"

[martin]

in reply to Benchmarking "Are all these characters in this sentence?"

Just for completeness, try this one, too:

  martin => sub {
      # args: sentence, wantedchars
      '' eq $_[1] ||
      '' ne $_[0] &&
      $_[1] =~ /^[\Q$_[0]\E]*\z/;
  },

Putting the whole sentence into a character class will kind of suck with veeery long sentences but medium-sized cases should benefit from the one-pass approach.

Update: fixed the order of subroutine parameters

[RMGir]

You're checking whether only the wantedchars are used.

That wouldn't work. The question isn't whether the sentence consists ONLY of characters in the wantedchars, just whether or not ALL the wantedchars are present.

[martin]

You're checking whether only the wantedchars are used.

Not quite. It's supposed to be the other way round. The idea is to check whether $wantedchars only contains characters from $sentence.