sub recursive_store {
$query[$level] = "sql code here";
$query[$level]->execute;
while((_STORAGE[$level])=$query[$level]->fetchrow_array) {
print _STORAGE[$level][0]; 
} 
}

&recursive_store($level);