#!/usr/bin/perl -w
print map "\n$_ => $ENV{$_}", keys %ENV;