如何使用Perl解析文件的一部分?

前端之家收集整理的这篇文章主要介绍了如何使用Perl解析文件的一部分?前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
我是Perl的新手,但我听说它对于解析文件很有用,所以我想过给它一个旋转.

我有一个文本文件,其中包含以下示例信息:

High school is used in some
parts of the world,particularly in
Scotland,North America and Oceania to
describe an institution that provides
all or part of secondary education.
The term "high school" originated in
Scotland with the world's oldest being
the Royal High School (Edinburgh) in
1505.

The Royal High School was used as a
model for the first public high school
in the United States,the English High
School founded in Boston,Massachusetts,in 1821. The precise
stage of schooling provided by a high
school differs from country to
country,and may vary within the same
jurisdiction. In all of New Zealand
and Malaysia along with parts of
Australia and Canada,high school is
synonymous with secondary school,and
encompasses the entire secondary stage
of education.

======================================
Grade1 87.43%
Grade2 84.30%
Grade3 83.00%
=====================================

我想解析文件,只获取数字信息.一世
看着正则表达式,我想我会使用类似的东西

if (m/^%/) {
    do something
}
else {
    skip the line
}

但是,我真正想做的是跟踪变量
留下并将数值存储在该变量中.所以,之后
解析文件,我真的想拥有以下变量
将%值存储在其中.原因是,我想
创建不同等级的饼图/条形图.

Grade1 = 87.43
Grade2 = 84.30

你能提出我应该看的方法吗?

解决方法

@H_502_42@ 你需要一个正则表达式.像下面这样的东西应该工作

while (<>) {
  /(Grade[0-9]+)\s*([0-9]+\.[0-9]+)/;
  $op{$1} = $2;
}

作为过滤器. op hash将存储成绩名称和分数.这比自动实例化变量更可取.

猜你在找的Perl相关文章