#!/usr/bin/env perl
use v5.36;
no warnings q/experimental::for_list/;
for my ( $k, $v ) ( %ENV ) {
    say "$k=$v";
}
say "Done";