#!/usr/bin/perl
use Data::Dumper;
print $/, Dumper \%ENV;