All I am getting the error from my if statement:
^* matches null string many times in regex; marked by <-- HERE in m/^* <--
HERE Orig/ at .
I am trying to get everything except *Orig in this output :
*Orig Vol: 1703FBBDED58D4AD (E00117), Seq #: 000114 in TLU: st_9840_acs_0,
media: STK 984e
Orig Vol: 0303E68522777483 (E00486), Seq #: 000800 in TLU: st_9840_acs_0,
media: STK 984e
07/12/2004 18:13:17 Rotation ID:4A03CC27.A30DEE72.00000200.0E0B8707, 5
backups
Media duplication is not enabled.
*Orig Vol: 4A03CC27A30DEE72 (E00632), Seq #: 000273 in TLU: st_9840_acs_0,
media: STK 984e
Here is my code:
foreach ($EDM_nonactive_tapelist) {
if ($EDM_nonactive_tapelist !~ "\^\*Orig") {
print $_;
}
}
*NOTE the variable $EDM_nonactive_tapelist has the Orig strings in it.
Does foreach read line by line?
Do I even need the foreach statement?
thank you!
Derek B. Smith
OhioHealth IT
UNIX / TSM / EDM Teams