Help for this page
if ($reply !~ /^perfect/i) { $chatReply->{'correction'} = $reply; }
if ($reply !~ /^perfect/i and $reply !~ /perfect$/i) { $chatReply->{'correction'} = $reply; }