my $ins_rec="INSERT INTO $table (symbol,expn_dt,strike,open,bid,ask,last,volume) VALUES('" . join( "','", map {$h1{$_}} qw| symbol strike open bid ask last volume |). "')";