my @results = map $_*13, @data;