$SIG{TERM} = 関数名;
でパラメーターを渡せなくて困っています。
---------------------------------
$SIG{TERM} = \&exit;
sub exit
{
  exit;
}
---------------------------------
というのは出来るのですが
----------------------------------
$SIG{TERM} = \&exit("aaa");

sub exit
{
  my $aa = $_[0];
  print "$aa";
   exit;
}
--------------------------------
というのが出来ずに困っています。何かやり方を知っている方はいますか？？
※この記述だと「internal servererror」が起こりしかも、パラメーターが
渡らずに「\&exit;」が実行されます。