Help for this page

Select Code to Download

Select or download this

use feature qw/say/;

...
say defined($ENV{PERL_MYTEST}) ? "defined"         : "undefined";
say length($ENV{PERL_MYTEST})  ? "non-zero length" : "zero length";
say "<<$ENV{PERL_MYTEST}>>";

Select or download this
```
exists
defined
zero length
<<>>
```