my @prices = (0.99) x 300;
my $sum = 0;
for (@prices) {
    $sum += $_;
}
print $sum;
__END__
297.000000000001