On Sep 1, [EMAIL PROTECTED] said:
> foreach (split /\n/, $EDM_nonactive_tapelist ) {
>if (( /\((E\d+)/ ) && ( !m/\*Orig/ ) && (
>m/st_9840_acs_0/ )) {
There is no $1 if all those regexes succeed, because only the FIRST one
has something captured, and all the others remove
All,
can anyone provide some help?
my current output is
E00854), Seq #: 000595 in TLU: st_
and all I want is the E string and cannot get my substr working
Here is my code:
foreach (split /\n/, $EDM_nonactive_tapelist ) {
if (( /\((E\d+)/ ) && ( !m/\*Orig/ ) && (
m
