$a=q(;print"\$a=q($a)$a");print"\$a=q($a)$a"