my $r = `gunzip -c test.txt.gz|cut -f3 -d'|'|sort|uniq -c`;
my $c  = substr( $r, 6, -1 );