Happy New Year.

I have a series of values with the following form:

TO_Chr10_final.txt

I would like to obtain the value 10, for accounting purposes:

my $chr = ( split /_/ , $value ) [ 1 ] ;
$chr =~ /chr/i ;

$chr = $' ;

This seems convoluted.  Could someone please criticize this approach or
offer a better one?

Thank you,

Kevin


Kevin Viel, PhD
Post-doctoral fellow
Department of Genetics
Southwest Foundation for Biomedical Research
San Antonio, TX 78227 


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/


Reply via email to