Devel::Symdump can do this. I think there is also a module in the GraphViz distribution that can make a pretty one.