print<< x2,v10 print<< x2,v10 #### $a=q(;print"\$a=q($a)$a");print"\$a=q($a)$a"