獲取系統定義的所有信號名
use
?Config;
defined ? $Config {sig_name}? || ? die ? " No?sig?\n " ;
foreach ? $name ?( split ( ' ? ' , ? $Config {sig_name}))
{
???? print ? $name , ? " \n " ;
}
defined ? $Config {sig_name}? || ? die ? " No?sig?\n " ;
foreach ? $name ?( split ( ' ? ' , ? $Config {sig_name}))
{
???? print ? $name , ? " \n " ;
}
posted on 2006-03-22 20:37 weidagang2046 閱讀(274) 評論(0) 編輯 收藏 所屬分類: Perl