A first Obfuscation.

[j.a.p.h.]

Tested on Linux and Win98. Enjoy:

#!/usr/bin/perl ############################
@a = qw/kvtu bopvuifs qfsm ibdlfs/;$b = ".";
$n = 0;foreach $a (@a){$a[$n] =~ y/b-y/a-z/;
if ($n < @a-1) {print $a[$n] . " " ;}else  {
print $a[$n] . ".\n";}$n++;}#I am what I am.

[Adam]

For a first obfuscation, this isn't bad. But I could tell what you were up to as soon as I read the first line, which means it wasn't very obfuscated. Also note that a good obfuscation won't return warnings... yours does.
But like I said, its a good first attempt. Keep it up.

[j.a.p.h.]

Yes, I figured that (the first line) would probably give it away. But like I said, it was just my first attempt.

Just wait until I finnish writing my MUD (in Perl, of course) and obfuscate it. =]

[Rydor]

a mud written in perl would be sweet... will it be based on any preexisting muds? or will it be custom?

@///usr////((:::::bin:::::::::perl::::>

[turnstep]

> But I could tell what you were up to as
> soon as I read the first line

Yes, although I thought maybe the 4-8-4-6 was a clever variation of 4-7-4-6, but it turned out to be a spelling error. :)

P.S. Try using $_ instead of $b to get rid of the warning