eval [*$<]*'a=1;b=0;p eval"a*a=b+b=a;"*'