my @matches = grep /\$\$$/, split ' ', 'PARJT## PARJT$$ PARJT##';