do_smth( $& ) while /./g;