+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;
+}
+