JAPH

Posted by root Fri, 20 Jul 2007 02:54:00 GMT

$_->[/^(?>(.)?(.)+.*)(?!\1)(??{print(($1..$2)[9,0,15,7])})/]

Tags ,  | 2 comments

Fibonacci numbers in Ruby and Perl

Posted by root Fri, 20 Jul 2007 02:05:00 GMT

#!/usr/bin/env ruby

x=1;loop{p$.+=x=$.-x}



. #!/usr/bin/env perl

print$}+=$.=$}-$.||1while.1

Tags ,  | no comments