Miscellany

sub query_mysql {
        my $table=shift;
        my $data=shift;
        my $field_number=shift;
        my @results;
        my $query;
        $data=$mysql_handle->quote($data);
        if ($table eq 'users') {
                $query="SELECT * FROM $table WHERE user_name=$data";
        }
        my $query_handle=$mysql_handle->prepare($query);
        $query_handle->execute || \&reconnect_mysql;
        $query_handle->bind_columns(\$user_name,\$user_time,\$user_level);
        while ($query_handle->fetch) {
                push(@results,{1=>$user_name,2=>$user_time,3=>$user_level});
        }
        $query_handle->finish;
        my $result=$results[0]->{$field_number};
        return $result;
}