> {print qq|<option value="$pav" style=\"color:gray\">$pid：$pnm($pjb)\n| }←ココを追加したのですが
これは必要無いです。

> 　　　　print qq|<option value="$pid">$mark：$pid：$pnm($pjb)\n|}}
この部分を以下のようにすれば良いです。
　　　　　　print qq|<option value="$pid"|, ($pav eq 'dead' ? ' style="color: gray"' : ''), qq|>$mark：$pid：$pnm($pjb)\n|;
　　　　}
　　}

個人的には色がgrayならcolorよりはbackground-colorにしたほうが見分けやすいのでは、と思います。

▼関連発言
│
└◆1651:オークションについて [rien] 02/04 23:49
　└◆1652:Re:オークションについて [moon] 02/05 00:59
　　└◆1653:Re[2]:オークションについて [moon] 02/05 08:13
　　　└◆1654:Re[3]:オークションについて [rien] 02/05 21:37
　　　　└◆1655:Re[4]:オークションについて [moon] 02/05 23:57
　　　　　└◆1656:Re[5]:オークションについて [rien] 02/06 00:46
　　　　　　└◆1657:Re[6]:オークションについて [moon] 02/06 23:26
　　　　　　　└◆1658:Re[7]:オークションについて [moon] 02/06 23:41
　　　　　　　　└◆1660:Re[8]:オークションについて [rien] 02/07 17:02
　　　　　　　　　└◆1661:Re[9]:オークションについて [moon] 02/07 23:34
　　　　　　　　　　└◆1663:Re[10]:オークションについて [rien] 02/08 00:01
　　　　　　　　　　　└◆1664:Re[11]:オークションについて [moon] 02/08 00:41
　　　　　　　　　　　　└◆1665:Re[12]:オークションについ... [moon] 02/08 00:46
　　　　　　　　　　　　　└◆1666:Re[13]:オークションにつ... [rien] 02/08 01:24<-last