[sandy]perl -e '$x="hello"; $y="thishelloyouhellotoday"; @a=split /$x/,$y; print "@a\n";' this you today [sandy]