in reply to Re: split string on key word
in thread split string on key word

Quick 'n dirty:
($str1,$str2) = split(/Wnr:/, "some one 7/7 Wnr: some 2 2/3"); $str2 = "Wnr:".$str2; print "$str1\n$str2\n";
some one 7/7
Wnr: some 2 2/3