in reply to covariance calculation
my $covariance = covariance (@hits,\@sales);
Update: Changed to block code instead of inline.
--MidLifeXis