如何从一列拆分分母值并使用perl将其存储在另一列中?

时间:2016-12-20 08:41:43

标签: perl cgi

我的示例代码输出:

<inspection name>
  1. 我附加了使用time | name | status | s_used | s_max | +------------+-------------+-----------+------------+-----------+ | 1482222363 | asf | Closed | 0/16 | 0 | | 1482222363 | as0 | Available | 4/16 | 4 | perl脚本和cgi数据库生成的输出部分。

  2. 我的查询是如何从列 s_used 中获取分母值,并仅使用 s_max 列中的分母值进行存储的Perl。

  3. 3.我附上了我试过的以下代码部分。

    mysql

    代码说明:

    1. if($i == 4){ if(/s_used/){ print; } else{ chomp(); my($num,$s_max)=split /\//,$table_data{2}{'ENTRY'}; print $s_max; } } 是我应该存储变量的列。

    2. 我从sql数据库$i == 4得到time列,$time我来自name$table_data{0}{'ENTRY'}来自status,来自$table_data{1}{'ENTRY'}的{​​{1}}。

    3. 预期产出:

      s_used

1 个答案:

答案 0 :(得分:1)

似乎您的代码“my($num,$s_max)=split /\//,$table_data{2}{'ENTRY'};”是对的。

当它写入数据库时​​,值$s_max不正确。由于您没有发布代码部分以显示部分$s_max写回数据库,因此您需要检查$s_max中的值(例如,打印$s_max值)在将其写回DB之前的时间。从那里,请尝试追溯为什么将不正确的值分配给$s_max。然后,问题就会解决。