perlを使用してOracleで複数回クエリを実行すると、最初のクエリのみが返されます

でみんなが言ったように、最後に尋ねた質問 、ネストされた角かっこではなく、かっこで配列を初期化します。

@some_array= ([sam, jon, july],[Mike, Han,Tommy],[angie, sita, lanny])

ない

@some_array= [[sam, jon, july],[Mike, Han,Tommy],[angie, sita, lanny]]

また、含めることで大きなメリットが得られます

use strict;
use warnings;

すべてのプログラムの上部にあります。それはあなたが@some_arrayを初期化しようとしている奇妙な方法を捕らえるでしょう 、そしてそれはあなたの@sqlの一貫性のない使用法を捕らえるでしょう および@query 。 更新 および$sdh および$db および$dbh 。