++$";while($\=$/and$"++and$;=$"){
do{$;&=$|and last if!($"%$_)}for@_;
push@_,$"and print$"if$;}


##</code><code>##

++$";
while($\= $/ and $"++ and $;=$" ) {
	do{
		$; &= $| and last if ! ($" % $_)
	} for @_;
	push @_, $" and print $" if $;
}

##</code><code>##

while($\= $/ and $"++ and $;=$" ) {

##</code><code>##

	do{
		$; &= $| and last if ! ($" % $_)
	} for @_;

##</code><code>##

push @_, $" and print $" if $;