perl - bind_columnsがある場合とない場合のPerl DBIの違いは何ですか?

Question

perl dbi の次のコードの違いは何ですか?

1.

while (my ($p1, $p2, $p3) = $sth->fetchrow_array()) {
    # ... some code ...
}

2.

$sth->bind_columns(\my ($p1, $p2, $p3));
while ($sth->fetch) {
    # ... some code ...
}

どちらも同じ結果になります。Perlmonks はバインド バリアントについてアドバイスします。誰かが理由を説明してくれれば幸いです。