use Tokenizer; @myarr=Tokenizer::tokenize(('a','b','&','&','c','d')); #@myarr=('a','b'); #print @myarr;