Assim como todos disseram no o última pergunta que você fez , inicialize sua matriz com parênteses, não colchetes aninhados.
@some_array= ([sam, jon, july],[Mike, Han,Tommy],[angie, sita, lanny])
não
@some_array= [[sam, jon, july],[Mike, Han,Tommy],[angie, sita, lanny]]
Você também se beneficiaria tremendamente de incluir
use strict;
use warnings;
no topo de todos os seus programas. Isso pegaria a maneira estranha que você está tentando inicializar
@some_array , e pegaria seu uso inconsistente de @sql e @query . atualizar e $sdh e $db e $dbh . 
