From 1f005773df11ea43d886476e922b8fefe9f2a6a1 Mon Sep 17 00:00:00 2001
From: Florian Pritz <bluewind@xinu.at>
Date: Sat, 2 Dec 2017 23:02:17 +0100
Subject: vim: Add perlomni

Signed-off-by: Florian Pritz <bluewind@xinu.at>
---
 .vim/bin/grep-pattern.pl | 14 ++++++++++++++
 1 file changed, 14 insertions(+)
 create mode 100755 .vim/bin/grep-pattern.pl

(limited to '.vim/bin/grep-pattern.pl')

diff --git a/.vim/bin/grep-pattern.pl b/.vim/bin/grep-pattern.pl
new file mode 100755
index 0000000..fd501ea
--- /dev/null
+++ b/.vim/bin/grep-pattern.pl
@@ -0,0 +1,14 @@
+#!/usr/bin/env perl
+my $file    = shift;
+my $pattern = shift;
+open FH, "<" , $file or die $!;
+my @lines = <FH>;
+
+my @vars = ();
+for ( @lines ) {
+    while ( /$pattern/og ) {
+        push @vars,$1;
+    }
+}
+close FH;
+print $_  . "\n" for @vars;
-- 
cgit v1.2.3-24-g4f1b