wrkrbeee has asked for the wisdom of the Perl Monks concerning the following question:

Hi Perl Monks, have a simple regex issue where I wish to omit dashes from the following numeric variable: 0001144204-09-017358 . Simple, but clearly I lack the skills to get 'er done. Relevant code appears below. As is, the code extracts everything prior to the first dash. I need the entire expression (i.e., all digits in continuous fashion without the dashes, 000114420409017358 ). This variable is numeric. I'm embarrassed to say the least. Thanks for tolerating me!

my $access_num=-99; #several other lines betweeen here, omitted for brevity; if($line=~m/^\s*ACCESSION\s*NUMBER:\s*(\d*)/m){$access_num=$1;}