in reply to Bit by a Hex String

You can use << to do a bit shift to the left.

Also you should write if($char_stream =~ /^$/) as if(length($char_stream) == 0). No need to use a regex for that.

Replies are listed 'Best First'.
Re^2: Bit by a Hex String
by abitkin (Monk) on Aug 29, 2003 at 14:38 UTC
    As far as I can tell, using your bit shift assumes two things that I don't have.

    The first is that my string is a decimal number. It isn't. I don't know what would happen if you shifted a string filled with hex by 1.

    The second is, that my hex string would fit inside a scalar. Perl numbers are limited to 64 bits, and as I mentioned, this string is 104 bits. (When converted from hex to a binary stream.)

    As for the length thing, yes, that is another way to do it, I was just going for simple at the time, and I didn't want to lookup length.
    ==
    Kwyjibo. A big, dumb, balding North American ape. With no chin.