你好 我初学perl 遇到报错 请好人看下代码哪里有错
报错是：Use of uninitialized value $tcgaId in hash element at tcgaATAC.prepareData.pl line 36, <RF> line 1.
Illegal division by zero at tcgaATAC.prepareData.pl line 51, <RF> line 2.

line 36 $tcgaId没有获取到值. uninitialized  value
line 51 $peakNum等于0 .即被if($samp1e[4]>3){next;} 跳过去了.

请问解决了吗，我也是这个atac-seq.pl报错呜呜呜