Well, you can implement a Perl peek() with unpack(‘P’,…). Once you have that, there’s only security through obscurity.