Help for this page

Select Code to Download


  1. or download this
    @_=(115,-17,6);
print map { chr($_[$.=$_-$_] * $_ ** $.++ + $_[$.] * $_ ** $.++ + $_[$
+.] * $_ ** $.) } $. - $. .. $#_
  2. or download this
    @_=(115,-17,6);
print map { chr($_[0] * $_ ** 0 + $_[1] * $_ ** 1 + $_[2] * $_ ** 2) }
+ 0 .. 2
  3. or download this
    @_=(115,-17,6);
print map { chr(115 + -17 * $_ + 6 * $_ ** 2) } 0 .. 2