#!/usr/local/bin/perl -w use strict; foreach (keys %ENV) { print "[$_] $ENV{$_}\n"; } #### * * * * * source /opt/home/u_huiar1/.profile;/opt/home/u_huiar1/perl/cron.pl 1>> /opt/home/u_huiar1/perl/output 2>&1 #### [LOGNAME] u_huiar1 [PATH] /usr/bin: [SHELL] /usr/bin/sh [HOME] /home/u_huiar1 [TZ] MET