#!/usr/bin/perl
$sum = 0;
for($count = 1; $count <= 99; $sum += ($count += 2)-2 ) { print "$count\n"; };
print "$sum";