foreach (@month) {
  say map { 
        if ($_) {   # if the element is not undef
            sprintf "%2d ", $_; 
            # format it so it takes 2 spaces, and add one space to it
        }
        else {      # if the element is undef
            '   ';
            # replace it with 3 spaces
        }
    } @$_;
}