" Vim filetype plugin file" Language:	Perl" Maintainer:	Dan Sharp <dwsharp at hotmail dot com>" Last Change:  2005 Dec 16" URL:		http://mywebpage.netscape.com/sharppeople/vim/ftplugin if exists("b:did_ftplugin") | finish | endiflet b:did_ftplugin = 1 " Make sure the continuation lines below do not cause problems in" compatibility mode.let s:save_cpo = &cposet cpo-=C setlocal formatoptions+=crq setlocal comments=:#setlocal commentstring=#%s " Change the browse dialog on Win32 to show mainly Perl-related filesif has("gui_win32")    let b:browsefilter = "Perl Source Files (*.pl)\t*.pl\n" .		       \ "Perl Modules (*.pm)\t*.pm\n" .		       \ "Perl Documentation Files (*.pod)\t*.pod\n" .		       \ "All Files (*.*)\t*.*\n"endif " Provided by Ned Konz <ned at bike-nomad dot com>"---------------------------------------------setlocal include=\\<\\(use\\\|require\\)\\>setlocal includeexpr=substitute(substitute(v:fname,'::','/','g'),'$','.pm','')setlocal define=[^A-Za-z_] " The following line changes a global variable but is necessary to make" gf and similar commands work.  The change to iskeyword was incorrect." Thanks to Andrew Pimlott for pointing out the problem. If this causes a" problem for you, add an after/ftplugin/perl.vim file that contains"       set isfname-=:set isfname+=:"setlocal iskeyword=48-57,_,A-Z,a-z,: " Set this once, globally.if !exists("perlpath")    if executable("perl")	if &shellxquote != '"'	    let perlpath = system('perl -e "print join(q/,/,@INC)"')	else	    let perlpath = system("perl -e 'print join(q/,/,@INC)'")	endif	let perlpath = substitute(perlpath,',.$',',,','')    else	" If we can't call perl to get its path, just default to using the	" current directory and the directory of the current file.	let perlpath = ".,,"    endifendif let &l:path=perlpath"--------------------------------------------- " Undo the stuff we changed.let b:undo_ftplugin = "setlocal fo< com< cms< inc< inex< def< isf<" .	    \	      " | unlet! b:browsefilter" " Restore the saved compatibility options.let &cpo = s:save_cpo