@_=(115,-17,6); print map { chr($_[$.=$_-$_] * $_ ** $.++ + $_[$.] * $_ ** $.++ + $_[$.] * $_ ** $.) } $. - $. .. $#_