pointed map.pl to generic perl