use strict;
use warnings;

#...
#...

my $s;      # declared, but uninitialized

#...
#...

$s .= some_expression() for @some_list;