au BufWritePost *.pl,*.pm !perl -wcIlib %