Kevin Viel wrote: >
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 ;
}
Surely:
if ($code eq "") {
$code = $out ;
$code =~ s/\.out$/\.cde/ ;
}
Or am I missing something?
Rob
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
