diff options
Diffstat (limited to '.vim/bin/grep-pattern.pl')
-rwxr-xr-x | .vim/bin/grep-pattern.pl | 14 |
1 files changed, 14 insertions, 0 deletions
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; |