use Storm;

local $rain = new Storm {
        type => 'thunderstorm',
        size => 'big',
        ('intense', 'beautiful')
};

$rain->falls(my $roof);

foreach ($rain->drop() ) {
        my $dreams++;
}
[download]