从文件输入
ID S1 S2 S3 S4
a R1 R2 R3 R4 R5 R6 R7 R8
. . . . . .
. . . . .
a是ID可能是字符串
R1，R2，R3，R4 .....是数值
我必须使用perl脚本。我必须从文件读取上述数据并读入哈希。如果差值大于0，我必须计算R1和R2的差值，然后按原样打印R1和R2，其他放0代替R1和R2。接下来找出R3和R4的区别。我们如何使用哈希
来解决上述问题perl程序的输出：
ID S1 S2 S3 S4
a R1 R2 0 0 0 0 R7 R8
. . . . . .
. . . . .
. . . . .