$_=q($_=q(1);s/1/$_/;print);s/1/$_/;print