in reply to Re^3: select elements in a list
in thread select elements in a list
AAD; ;CCR;365 TEC;UTF;TDE;450 TRE; ;FTE;164 TEC;URT;TDE;687 ERT; ;ETR;567 TEC;UGC;TDE;687
"AAD";" ";"CCR";365 "TEC";"UTF";"TDE";450 "TRE";" ";"FTE";164 "TEC";"URT";"TDE";687 "ERT";" ";"ETR";567 "TEC";"UGC";"TDE";687
while (<INFILE>){ # the /^ indicates the begining of the research for $_ ($_ is unde +rstated here) my @Elements = split(/;/,$_); if ($Elements[1] ne '""'){ print OUTFILE $_; } }
|
|---|