# 5.36 - for loops use v5.36; use experimental qw/ for_list /; my %hash = (apples => 23, oranges => 4); for my ($key, $value) (%hash) { say "$key: $value"; } my @coords = (3,4,7, 1,1,2, 5,5,3); for my ($x, $y, $z) (@coords) { say "$x,$y,$z"; }