用perl提取股票F10资料请帮忙看看

用perl提取股票F10资料请帮忙看看

虽然只刚看了一本小骆驼书,但是想试着用perl处理工作中遇到的问题,耽误大家时间了,请帮忙解决下。
如下的格式:
|★最新主要指标★  |07-09-30|07-06-30|07-03-31|06-12-31|06-09-30|
|每股收益(元)          |0.1100  |0.0800  |0.0200  |0.1300  |0.0800  |
|每股净资产(元)       |3.2600  |3.2300  |3.2400  |3.1900  |3.1500  |
|净资产收益率(%)    |3.28      |2.60      |0.47      |4.11      |2.44      |
|总股本(亿股)          |4.4115  |4.4115  |4.4115  |4.4115  |4.4115  |
想把每个财务指标项的数据跟相应时间列对应提取出来。比如每股收益07-09-30和0.1100、07-06-30和0.0800对应提取出来。该怎么做呢?

还有我想提取|证券类别|上海A股               |上市日期|1998-04-27            |中证券类别后边的“上海A股”,我查了资料之后是这么做的:#!/usr/bin/perl
        $dat="证券类别";
                $cn="[\x01-\x7f]|[\x81-\xfe][\x40-\xfe]";
        open INTXT,"600168.txt";
        while (<INTXT>) {
                if (/.$dat |($cn+).*/x) {
                        print "$1\n";
                                        }
                }
虽然可以提取出“上海A股”,但是只知道[\x01-\x7f]|[\x81-\xfe][\x40-\xfe]是代表gb2132的汉字编码,却不知道每个字符集分别都是代表啥意思啊?
最后一个问题,我查的perl对于汉字处理,有提到需要用到Encode模块的decode、encode函数,可是我在上几行代码里没用到Encode模块,不也一样能匹配汉字吗?
困惑,请明白的兄弟给讲讲。谢谢了。

这种问题还是让 google 给你扫盲吧。
哈哈,我用的百度。可能我太笨了,找不到相应的答案。
专业不是计算机,看来我提的问题在版主眼里太简单了。万事开头难,这3个问题,不怕你见笑,我自己连看书带百度琢磨2礼拜了也没解决。不是本专业不擅长这些,求大家求到这来了,看哪位不忙的能回答就多谢了。

这个问题还是有一定的难度了,
而且解释起来一两句话说不清楚,
因此希望你自己了解一下相关的资料。
你用split(/\|/)不可以解决吗?
你看看这篇文章应该相当有帮助。
http://huanff.blog.sohu.com/68089591.html
相当不错,很详细,学习了.多谢
谢谢~茅塞顿开。
谢谢大家。