Fix typo in variable name.
This commit is contained in:
parent
d4e8b71bee
commit
0333ea45fa
1 changed files with 5 additions and 5 deletions
|
@ -140,13 +140,13 @@ foreach my $supporterId (@supporterIds) {
|
||||||
}
|
}
|
||||||
|
|
||||||
my $subject = "Supporter lapsed report for $TODAY";
|
my $subject = "Supporter lapsed report for $TODAY";
|
||||||
my $per = ( ($lapsedCount / $totalSuppporters) * 100.00);
|
my $per = ( ($lapsedCount / $totalSupporters) * 100.00);
|
||||||
my $headerInfo = "$subject\n" . ("=" x length($subject)) .
|
my $headerInfo = "$subject\n" . ("=" x length($subject)) .
|
||||||
"\n\nWe have " . $totalSuppporters . " supporters and $lapsedCount are lapsed. That's " .
|
"\n\nWe have " . $totalSupporters . " supporters and $lapsedCount are lapsed. That's " .
|
||||||
sprintf("%.2f", $per) . "%.\nActive supporter count: " . ($totalSuppporters - $lapsedCount) . "\n" .
|
sprintf("%.2f", $per) . "%.\nActive supporter count: " . ($totalSupporters - $lapsedCount) . "\n" .
|
||||||
sprintf(" Of the active supporters, %.2f%% are monthly and %.2f%% are annual",
|
sprintf(" Of the active supporters, %.2f%% are monthly and %.2f%% are annual",
|
||||||
( ($activeCounter{Monthly} / ($totalSuppporters - $lapsedCount)) * 100.00),
|
( ($activeCounter{Monthly} / ($totalSupporters - $lapsedCount)) * 100.00),
|
||||||
( ($activeCounter{Annual} / ($totalSuppporters - $lapsedCount)) * 100.00)) . ".\n\n";
|
( ($activeCounter{Annual} / ($totalSupporters - $lapsedCount)) * 100.00)) . ".\n\n";
|
||||||
|
|
||||||
foreach my $type (keys %lapsedCounter) {
|
foreach my $type (keys %lapsedCounter) {
|
||||||
$headerInfo .= sprintf("%7s: Lapsed Count: %3d Active Count: %3d\n",
|
$headerInfo .= sprintf("%7s: Lapsed Count: %3d Active Count: %3d\n",
|
||||||
|
|
Loading…
Reference in a new issue