Re^4: REGEX omit dashes - simple but ...

[wrkrbeee]

Thanks guys, here's the revised statement, along with the result: if($line=~m/^\s*ACCESSION\s*NUMBER:\s*/m){$access_num=$1; $access_num =~ tr/-//d;} Result is the error message stating "Use of uninitialized value ...." ?? Thanks!!!

[stevieb]

You forgot to add your capture group of (\d*). However, that won't really help, as that won't capture your - (dashes), or any numbers after it.

Why don't you show us a few lines of example data you're trying to match?

Also, Use of uninitialized... is not an error, it's a warning. It's most likely saying that $1 is uninitialized (because you didn't capture anything).

[kennethk]

You are getting an uninitialized error because you are trying to change the content of $access_num, to which you've assigned $1, but there were no parentheses in your first regular expression. Maybe you mean something like:

if ($line =~ s/^\s*ACCESSION\s*NUMBER:\s*/) {
    $line =~ tr/-//;
}

or possibly

if ($line =~ s/^\s*ACCESSION\s*NUMBER:\s*([-\d]+)$/m) {
    $access_num = $1; 
    $access_num =~ tr/-//;
}