perl菜鸟求助

大家好，
接到了一个任务，用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，有无更好的解决办法？
3,  第二个sub过程需要两个参数，sub如何得到不同的参数。&mysubfunction($filename);这个我知道了可疑用$_[0]得到，可疑如果是一个数组作为传入参数呢？是这样吗？ &mysubfunction(@myhasharray); 然后怎么得到这个传入的数组入参呢，如何得到数组大小呢？

烦劳大家写个问题的简单的代码例子，本人比较笨，并且对perl很不了解。
请不要说perl的术语，我是外行。谢谢。

历遍 hash 一般用 while (my($k, $v) = each %hash) {} 或者 for (keys %hash) {} 清空在循环后直接 %hash = () 就可以了。

怎么楼主突然需要用没学过的 Perl 来干活了，好歹熟悉下啊