my $r = for (1, 2, 3) {$_ + 4};