> > 少しなら
> 配列の変数が空なら０を、値が入っていればそのままにしたくて
> @DATA = ($a,$b,$c);
> foreach(@DATA){if($_ == ""){$_ = 0;}}
> って書いてみたんだけどﾀﾞﾒだった
> やり方ｷﾎﾞﾘ

foreach(@DATA){unless(defined($_)){$_ = 0;}}

参考：2003/10/08(水)20時45分05秒