Fix the regular expression for Perl 5.8. bugid:110491