in reply to username/password validation

The use of crypt instead of something stronger, subs with ampersands, and "chop" instead of "chomp" makes this code look really old. It looks like Perl 4, am I right?


($_='kkvvttuubbooppuuiiffssqqffssmmiibbddllffss')
=~y~b-v~a-z~s; print