How can take the value of one variable, substitute say its suffix, and
assign it to another? I have only figured out how to do it using an
intermediate variable:
if ( $code eq "" ){
my $base = $out ;
$base =~ s/\.out$/\.cde/ ;
$code = $base ;
}
Many thanks,
Kevin
--
Kevin Viel
Department of Genetics [EMAIL PROTECTED]
Southwest Foundation for Biomedical Research phone: (210)258-9884
P.O. Box 760549 fax: (210)258-9444
San Antonio, TX 78245-0549
Kevin Viel
PhD Candidate
Department of Epidemiology
Rollins School of Public Health
Emory University
Atlanta, GA 30322
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
