为什么程序会跑飞了?

为什么程序会跑飞了?

请教高手一个问题,我写了一个perl程序,大概的功能是从文件中读取一些数据,然后把这些数据按一定的规则重新组合一下,生成一条指令。
问题是:当我的数据不多时,程序没有问题,但当我的数据很多时,cpu就运行100%,程序跑飞了。我不知道是代码问题还是其他的问题,不
知道有没有人遇到类似的问题?
一般遇到这种问题是因为程序考虑的不够全面,进入死循环了。建议重新检查程序。
把程序贴出来看看啊