Public Scratchpad

Download, Select Code To D/L

Help for this page

Select Code to Download

Select or download this

sub bitextr {
  my $bitstring = shift;
...
  return (($bitstring >> $bitnum1) & ($mask));
}