perl菜鸟求助

[isarc]

大家好，
接到了一个任务，用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，有无更好的解决办法？

谢谢大家，压上全部家当

[isarc]

第二个sub过程需要两个参数，sub如何得到不同的参数。
烦劳大家写个代码例子，本人比较笨，并且对perl很不了解。

[isarc]

请不要说perl的术语，我是外行。谢谢。

[bargio_susie]

又是一个直接吃现成的

[kakane]

each 函数可以遍历整个hash 它能用两个元素的列表形式返回键/值对 每次对同一个hash调用此函数，它就会返回下一组键/值对，直到所有的元素都被访问过。
例：while(($key,$value)=each %hash){
print "$key=>$value\n";
}

另一种方法：
foreach $key (sort keys %hash){
$value = $hash{$key};
print "$key => $value\n";
}

[isarc]

任务已经完成了，不是我要吃现成的，我只想知道用什么语句而已。4楼的也不是我想要的答案。

分都给你了。