(undef$a)and(undef$b)or++$a;while( $a!=2){$a++if($b);$b++if(not$b);} $b++?$d=$a.'+'.$b.'=':die;map{$c+= $_;}($a,$b);$_=$d.$c."\n";print;