:)

I usually type out 'The/Name.pm', but I did find this in my notes

BEGIN { $INC{ do{ (my $name = __PACKAGE__)=~s{(::)|(\.pm$)}{$1?'/':''}
+ge; $name }} = __FILE__; }
[download]

And right after that a note about https://metacpan.org/pod/Module::Loaded#$bool-=-mark_as_loaded(-PACKAGE-);