sub mapsub { my @arr; @arr = map { ($_ + 2) } @data; }