@array=split(/-/,$value);
$pdbid=$array[0];
$from=$array[1];
$to=$array[2];
$chainid=$array[3];
if($chainid eq "_")
{
$chainid=" ";
}
$menu1=$array[4];
$menu2=$array[5];
$menu3=$array[6];
@array=();