Fixed some strange Perl error