Select Code to Download

$dbcolumn[$x] instead of @dbcolumn[$x]

for ($x = 0; $x <= $#array; $x++) {
  ... $array[$x] ...
...
foreach $element (@array) {
  ... $element ...
}