Alternately you can avoid Perl altogether - there are several online tools to do exactly this, convert gene names between the various naming schemes: DAVID or IDConverter are just a few!

Hope this helps...