echo die > Whatever.pm

perl -wMstrict -MData::Dump -I. -e  "my $ret;eval {$ret=require Whatever};dd $ret; dd %$INC{$_} for grep{/Whatever/} keys %INC;"

undef                   # <--- require returned value
("Whatever.pm", undef)  # die in the module will leaves the entry in %INC



echo 0 > Whatever.pm

perl -wMstrict -MData::Dump -I. -e  "my $ret;eval {$ret=require Whatever};dd $ret; dd %$INC{$_} for grep{/Whatever/} keys %INC;"

undef                   # <--- require returned value