大家好，
接到了一个任务，用perl写一个测试脚本，哎。。。。本人学C++的。。。。有些语句和函数真的查不到，所以问问各位高人，请大家无私帮助一下。

任务：一堆html，得到html的部分数据，然后按照html里面的不同日期，将数据写入excel文件，一个日期写一个文件。

思路：
1，一个sub过程读取所有的html文件，得到hash数据，得到不同的日期hash
2，将两个hash传入一个sub过程，这个过程将for循环日期hash，然后匹配数据hash，提取hash里面的全部当天数据，写一个excel，循环写完多个文件。
for （日期hash）{
write riqi.xls or open the file；
for （遍历数据hash）{
get right hash data， write data；！！！！（delete当前data from 数据hash）
}
}

问题：
1，如何遍历hash，读取每一个数据，读过之后就删除当前的hash元素
2，有无更好的解决办法？

谢谢大家，压上全部家当