sub TestEquity { return 1 if $_[0] =~ m/(?