map <C-P> i#!/usr/bin/perl<CR>use strict;<CR>use warnings;<CR><CR>
ab usw use strict;<CR>use warnings