in reply to Perl Regex
no?$data = '[-3|1|29x250+46+26|200+300+444|Get][-3|1|29x250+46+26|200+300 ++444|Get][-3|1|29x250+46+26|200+300+444|Get]'; @data = split /[\[\|x\+\]]/, $data; foreach $i (0 .. $#data){ $i % 11 != 0 ? print $data[$i]," " : print $data[$i],"\n"; } -----output----- -3 1 29 250 46 26 200 300 444 Get -3 1 29 250 46 26 200 300 444 Get -3 1 29 250 46 26 200 300 444 Get
|
|---|