in reply to Re: Find cksum (Linux) equivalent in Perl windowsin thread Find checksum (Linux) equivalent in Perl windows
Now if someone could golf that $revb, please?
Try:
sub revB{ ord pack 'b8', unpack 'B8', chr( shift ) } [download]