#!/usr/bin/perl
use 5.018;
use warnings;

my $key;
foreach $key (keys(%ENV)) {

    printf("%-10.10s: $ENV{$key}\n", $key);

}