• File::HomeDir
• File::Path::Expand
• File::Save::Home

Presumably the edge cases you described are solved in one or more of these modules. I haven't looked myself, but you did ask for module fu. The first one claims to work on any platform for instance.