my @funcArray = (undef)       #my @funcArray = @_;
my $funcSum = 0;
my $funcArr = 0;
my $arrcount = 1;             #my $arrcount = scalar(@_);

foreach my $line ((undef)) {  #foreach my $line (@funcArray)
   $funcSum += $line;
}