模拟退火算法求解旅行商TSP问题（Perl源码）

使用启发式算法就求解旅行商（TSP）问题是一种现在较常使用的算法，但大多启发式算法程序都是用C或JAVA编写的，还很少有看到用perl编写的源码，所以有些使用Perl的朋友常常为找不到模板而发愁。我是一名在校学生，正好趁最近在学习模拟退火算法，并且喜欢Perl语言，我把写好的程序张贴出来晒晒，希望谢谢大家多多指教！