au BufNewFile *.pl,*.cgi s,^,#!/usr/bin/perl -w, \ | w \ | !chmod +x %