From c932def8cbb86723bbce9ca79692ebbed59e9528 Mon Sep 17 00:00:00 2001
From: martinahansen <martinahansen@74ccb610-7750-0410-82ae-013aeee3265d>
Date: Thu, 16 May 2013 09:04:37 +0000
Subject: [PATCH] more verbose grab output

git-svn-id: http://biopieces.googlecode.com/svn/trunk@2172 74ccb610-7750-0410-82ae-013aeee3265d
---
 bp_bin/grab | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/bp_bin/grab b/bp_bin/grab
index 76e333a..b034f2d 100755
--- a/bp_bin/grab
+++ b/bp_bin/grab
@@ -139,6 +139,8 @@ if ( $options->{ 'verbose' } )
 {
     print STDERR "Records grabbed: $grabbed\n";
     print STDERR "Records missed: " . ( $total - $grabbed ) . "\n";
+    print STDERR "Patterns used: " . ( scalar @{$patterns} ) . "\n" if defined $patterns;
+    print STDERR "Patterns used: " . ( scalar keys %lookup_hash ) . "\n" if %lookup_hash;
 }
 
 
-- 
2.39.2