Re: Discovering Esoteric Meanings With Perl Part 2 -- The FOX Network

[wol]

I tweaked the code just slightly:

my $i = 1;
my %occult = map { $_ => int ($i++ / 9) + 1} ('A' .. 'Z');
my $news = 'FOX';
print join( '', map $occult{$_}, split '', $news ) . $/;

Now it prints out "123". Does that mean that Fox is not evil, but progressive?

Or does it mean that these mathematical co-incidences are just meaningless, and people wishing to claim that Fox is evil should just back it up with information about what Fox broadcasts?

[Anonymous Monk]

Who said 666 was evil? Does this mean you're just expressing your bitterness over things you have no control of? :)