Re^2: how is this uninitialized?

[redlemon]

Or, while we're giving alternatives:

print <<"REPORT"

    There are @{[ scalar @downhosts ]} hosts down
    There are @{[ scalar @uphosts   ]} hosts up

    The following hosts are alive:
        @{[ join "\n\t" => @uphosts ]}

    The following hosts are down:
        @{[ join "\n\t" => @downhosts ]}

REPORT

I like inline expansions, apparently perl6 is supposedly going to make that easier.