sub AUTOLOAD{if(@_){$_=$_[0];sub{($a+=$_*@_)-> (2*$_||2)}}else{$_='';$a||a}}$\=()->();$\++for !()->(()->())->()->(()->())->()->(()->())->(() ->())->()->(()->())->(()->())->()->(()->())->( )->()->(()->())->(()->())->()->(()->())->()->( ()->())..()->();print