#! /usr/bin/perl -w
foreach (keys(%ENV)){
    print $_ . ": " . $ENV{$_} . "\n";
}