#!/usr/bin/perl

system "date";



#system 'ls -l $HOME |awk \'{ print $8 }\'';



#exec "date";



#print "$ENV{'PATH'}\n";

#$ENV{'PATH'} = "/home/athampan:$ENV{'PATH'}";

#print "$ENV{'PATH'}\n";





foreach $var (sort keys %ENV)  {

     print "$var => $ENV{$var}\n"

}