perl -MEnv -MString::Approx=amatch -MStorable -e 'print amatch(pop, keys %{ retrieve("$HOME/.cpan/Metadata")->{"CPAN::Module"} })' Win32::SocketPair

Win32::Socketpair