for (@_) { @differences = (@differences, (($_-$mean)*($_-$mean))); }