diff --git a/.config/nvim/autoload/vimrc.vim b/.config/nvim/autoload/vimrc.vim
--- a/.config/nvim/autoload/vimrc.vim
+++ b/.config/nvim/autoload/vimrc.vim
@@ -20,23 +20,6 @@ func! vimrc#SafeFilterFile(cmd)
   endtry
 endfunc
 
-if has('perl')
-  func! vimrc#PruneSession() abort
-    perl <<END_PERL
-      my @bufs =
-        grep { !-e $_->Name || -d _ || (-M _ >= 30) }
-        grep { $_->Name } VIM::Buffers();
-
-      while (my $b = shift @bufs) {
-        VIM::Msg 'pruned: ' . $b->Name, 'Comment';
-        VIM::DoCommand 'bwipeout ' . $b->Number;
-      }
-      VIM::DoCommand 'bprev'
-        unless $curbuf->Name;
-END_PERL
-  endfunc
-endif
-
 if has('ruby')
   func! s:PruneFiles(path, days) abort
     ruby <<END_RUBY