成语接龙的PERL程序IdionLink的变体