Perl數據::自卸車輸出處理

Question

我現在用的是DATA::Dumper API解析HTML表..

下面是Perl代碼：

print Dumper $row; 

這裏是輸出：

問題： 1.我想在寫入SQL表之前修改Info1，Info2等。我如何從上面的輸出訪問它？

類似$row->{var1}->？我嘗試了幾個選項，沒有任何工作。

Answer 1

這是一個老問題，有一個從未被選中的答案。

途徑由數組引用來更新數組引用

• 元素：

  $row->[0] = 'foo'; 
  $row->[1] = 'bar'; 
  $row->[2] = 'baz'; 
  

• 列表分配：

  ($row->[0], $row->[1], $row->[2]) = ('foo','bar','baz'); 
  

• 陣列列表賦值：

  @{$row} = ('foo','bar','baz');