#!/usr/bin/perl print "user: ", `whoami`; print "pwd: ", `pwd`; print "environment variables:\n"; print "$_: $ENV{$_}\n" for sort keys %ENV;