regexp fixed, now can find OBS_COUNTS followed by both [C/A/R] (obsolete) and [C/A/T] (current)

git-svn-id: file:///humgen/gsa-scr1/gsa-engineering/svn_contents/trunk@4675 348d0f76-0448-11de-a6fe-93d51630548a
This commit is contained in:
asivache 2010-11-15 15:28:38 +00:00
parent 7a3a464959
commit f2ee5dc319
1 changed files with 1 additions and 1 deletions

View File

@ -90,7 +90,7 @@ while( <$input_stream> ) {
my $indel_cnt = $2;
my $cov = $3;
if ( $_ =~ /\sOBS_COUNTS\[C\/A\/R\]:(\d+)\/(\d+)\/(\d+)\s/ ) {
if ( $_ =~ /\sOBS_COUNTS\[C\/A\/[RT]\]:(\d+)\/(\d+)\/(\d+)\s/ ) {
$cons_cnt = $1;
$indel_cnt = $2;
$cov = $3;