#!/usr/bin/perl
#
# Print all defined environment variables
#
foreach $key (sort keys %ENV) {
    print "$key => $ENV{$key}\n";
}