noremap <F4> <ESC>:make<C-M>

##</code><code>##

setlocal makeprg=perl\ -Mstrict\ -wc\ %