Well, you can implement a Perl peek() with unpack('P',...). Once you have that, there's only security through obscurity.
Larry WallAlthough the Perl Slogan is There's More Than One Way to Do It, I hesitate to make 10 ways to do something.
Larry Wall