Tach!
Das dumme ist, das alle Leute nur den Stern "*" als Jokerzeichen kennen. Rentiert da eine Umprogrammierung. Nach dem Motto wenn Eingabe gleich "*" bitte intern in "%" umschreiben und in die Select-Abfrage reinbuttern.
Suchen von * und Ersetzen durch % ist ein Funktionsaufruf. Den kannst du pauschal über den Eingabewert laufen lassen, ohne irgendwelche ifs und elses.
Beachte, dass du deine Benutzereingaben nicht einfach so ins SQL-Statement reinschreiben darfst. Nimm die von Perl sicherlich angebotenen Prepared Statements oder behandle die Werte zu Fuss.
dedlfix.