Select Code to Download

  if ($_ < $bytepos) {
    print '< ';
...
  if ($_ == $bytepos) {
    print '* ';
  }

  print qw(* > <)[$_ <=> $bytepos];