[joligario]

Here's what you are probably looking for:

sub EVENT_SAY {
  if($text=~/hail/i) {
    quest::say("Hello, $name. What can I do for you today?");
  }
}