#!/usr/bin/perl -T use strict; use warnings; print "Content-type: text/plain\n\n"; $ENV{PATH}="/usr/bin"; print "PARENT: PATH is $ENV{PATH}\n"; print " CHILD: PATH is ",`echo \$PATH`,"\n";