$  perl -V:yo -Te " undef $ENV{PATH}; exec q/perl -e die /"
yo='UNKNOWN';

$ Died at -e line 1.