正则表达式使用Perl

-2

检索表格数据我想查询一些数据是在像下面的表格，正则表达式使用Perl

+----------------------------------------------------- MA ESTICKSTS ------------------------------------------------------+ 
|         | |        | | | | Opms | Esticks Delsif |Baslentelts| 
|Name        |Type|Esticks Permina    |Div |LvL|mde|Loe|Thi|PC|HH|WE|SS|FF|ER|   | 
+---------------------------------+----+-------------------------------+----+---+---+---+---+--+--+--+--+--+--+-----------+ 
|Nuts-and-spices|code2398   |VS |Msserie_2398     |2398|7 |br |0 |3 | | | | | | |No   | 
|Nuts-and-spices.EP.034330..WERS..|VS |Msserie_2996     |2996|7 |br |3 |2 | | | | | | |Ye   | 
+---------------------------------+----+-------------------------------+----+---+---+---+---+--+--+--+--+--+--+-----------+

那是无论如何这个数据转换成JSON数组在Perl？因为如果我将这些数据放入关联数组中会很好。

而且我也不需要表头数据。我只需要提取行数据。

请帮助我！

来源

2016-07-22 Raja

你尝试过什么？为什么标记[tag：php]？ – revo

我很抱歉！它现在被删除... – Raja

数据从何而来？如果数据源有某种API（比如数据库的[DBI]（https://metacpan.org/pod/DBI）），那么最好使用它来解析用于人类消费的数据。 – ThisSuitIsBlackNot

从示例中可以看出，数据（标题下方）接近固定宽度参数。使用这些宽度扫描数据可能更容易获取数据。

或者，数据驻留在由'|'分隔的大字符串中字符。为什么不使用特定字符作为分隔符将字符串拆分为数组。使用trim（使用数组方法）清理数据可能是明智的。 [没有修剪不是股票库的一部分。检查食谱的更好的版本的修剪。]

来源

2016-07-22 19:47:42

正则表达式使用Perl

回答

相关问题