Select Code to Download

  my $len = index($string, "\x00", $index) - $index;
  $len = 4 if $len < 0 or $len > 4;
  $value = substr($string, $index, $len)