Avoid warnings; Don't use // for Perl 5.8 compatibility