($pdbid, $from, $to, $chainid, $menu1, $menu2, $menu3) = split(/-/,$value);
if($chainid eq "_") {
  $chainid=" ";
}