my $string = q(jsdlkjalsd same_text = 1, jhhj, jhjk = 256,iuqoi,uereoiu,sjksdh, same_text = 2, lkkj, lksj = 6287); my @inter = split(/(same_text\s=\s)/i, $string);