Language Basics Perl

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";