stdin linesDo:[:x|(Set evaluate:(x replaceAll:$,with:$*))printNl]