>>741-742
レスありがとうございます。
とりあえず>>741で教えていただいたページを参考に以下のようにしてみました。
function! YankWithIncreNumber() range
let a = ""
let i = a:firstline
let c = 1
while i <= a:lastline
let a = a . c . "." . getline(i) . "\n"
let i = i + 1
let c = c + 1
endwhile
call setreg('*', a, "l")
silent execute "p"
endfunction
vmap <silent> <Leader>l :call YankWithIncreNumber()<CR>Pgvd