In Perl most simple string comarison operations you could think of are done using the string comparison operators or the regex match operator.

But you say you have a genuine problem. And if it could be trivially solved using the string comparison operators or the regex match operator it would not be a genuine problem.

Perhaps you should try describing your problem.