Mega Code Archive

 

Categories / Perl / Language Basics

 

Read and set environment variables

use Env qw(PATH TEMP);     print "\$PATH = $PATH\n";     print "\$TEMP = $TEMP\n";     print "\$ENV{'TEMP'} = $ENV{'TEMP'}\n";     $TEMP = "e:\\temp";     print "\$TEMP = $TEMP\n";     print "\$ENV{'TEMP'} = $ENV{'TEMP'}\n";