p=cat p(a<-"!@#$% ^",b<-"&*() )(*& ^ %$#@! ") p(a,b) p(a) p(b)