All pastes #878328 Raw Edit

Mine

public text v1 · immutable
#878328 ·published 2008-01-29 13:35 UTC
rendered paste body
alias compare {
  tokenize 32 billy asd|5f asd|9f bgh|4j bill shf|5x hrg|4j hrg|5g
  var %limit 60,%1 $1
  while ($1 != %1) || (!%regex) {
    var %regex $+(/\b,$regsubex($1,/(.)/g,$iif(\1 isnum,\d,$iif(\1 isalpha,[a-z],\\1))),\b/gi), $&
      %match $regex($1-,%regex), %percent $calc(%match / $0 * 100)
    tokenize 32 $2- $1
    if (%percent > %limit) {
      echo -a Matches: %match -- %percent $+ % Regex Matched: %regex
      return
    }
  }
}