Search found 17 matches
- Thu Oct 14, 2010 3:11 pm
- Forum: Challenges Solved
- Topic: A Repeat of Pi
- Replies: 21
- Views: 1954
Not really fast but quite perlish with substr and =~ : $min_len = 2; STELLE: for ($stelle = 0; $stelle < 1000000; ++$stelle) { LEN: for ($len = $min_len; $len < (1000000 - $stelle); ++$len) { $folge = substr($pi,$stelle,$len); $rest = substr($pi,$stelle+$len); if ($rest =~ /$folge/) { $max = $folge;...
- Thu Oct 14, 2010 1:12 pm
- Forum: Challenges
- Topic: Didactic Text 4
- Replies: 20
- Views: 43778
- Wed Oct 13, 2010 8:33 pm
- Forum: Challenges Solved
- Topic: Lettered
- Replies: 8
- Views: 757
at first i tried just submitting the decoded string and it failed, tried with urlencoding because i thought it was firefox unable to submit these special chars. then i just looked at it and it was clear: pourcoffee :) Almost the same with me, although I didn't try urlencoding but looked for charact...
- Wed Jun 16, 2010 3:09 pm
- Forum: Challenges Solved
- Topic: Lazy Maze
- Replies: 26
- Views: 2074
- Tue Jun 15, 2010 9:53 pm
- Forum: Challenges
- Topic: Your Turn, Part Two
- Replies: 48
- Views: 49793
- Tue Jun 15, 2010 9:11 pm
- Forum: Challenges Solved
- Topic: Smell as Sweet
- Replies: 15
- Views: 1275
- Mon Jun 14, 2010 11:23 pm
- Forum: Challenges
- Topic: Imagine all the silicon
- Replies: 13
- Views: 22307
Re: Imagine all the silicon
What is the point of Imagine all the silicon challenge? There is nothing to look for :? Indeed, what is the point? For Ubuntu users the "challenge" consists in being able to read - and to realise there is indeed no other challenge. Well, this may be fair insofar as there are other challen...
- Wed May 26, 2010 1:13 pm
- Forum: Challenges
- Topic: Melodic
- Replies: 27
- Views: 37879
- Tue May 25, 2010 8:53 pm
- Forum: Challenges
- Topic: Too Many Digits
- Replies: 26
- Views: 34262
- Tue May 25, 2010 10:35 am
- Forum: Challenges Solved
- Topic: More Dastardly
- Replies: 10
- Views: 1135
- Sat May 22, 2010 10:34 am
- Forum: Challenges Solved
- Topic: Affirmative
- Replies: 15
- Views: 1620
My solution in bad Perl:
where @chars contains the hex values.
Code: Select all
print $_ == 0 ? chr(hex($_)) : $_ < 60 ? "*" : " " foreach @chars;
- Fri May 21, 2010 8:44 pm
- Forum: Challenges Solved
- Topic: CipherQuest A
- Replies: 3
- Views: 492
- Fri May 21, 2010 1:19 pm
- Forum: Challenges
- Topic: Breakout / Breakout Extreme
- Replies: 24
- Views: 44578
- Fri May 21, 2010 12:35 am
- Forum: Challenges Solved
- Topic: The Powers That Be
- Replies: 27
- Views: 3072
Perl
Code: Select all
use bignum;
$r = ((17 ** 39) ** 11);
for ($i = 0; $i < length($r); $i += 33) {
print substr($r,$i,1);
}
print "\n";
- Thu May 20, 2010 10:32 pm
- Forum: Challenges Solved
- Topic: UpCount
- Replies: 28
- Views: 2520