use strict;
use warnings;
use Env qw/EGGSHELL/;
                                                                                
if (defined $EGGSHELL) {
    print "$EGGSHELL\n";
} else {
    print "EGGSHELL not defined in \%ENV\n";
}