gistfile1.txt

$dbh->do("drop table if exists $test_table_name");                                                                                                                                                                                                                                                                             
my $create_query = qq{                                                                                                                                                                                                                                                                                                         
CREATE TABLE $test_table_name (                                                                                                                                                                                                                                                                                                
  id INT NOT NULL AUTO_INCREMENT PRIMARY KEY,                                                                                                                                                                                                                                                                                  
  uchar VARCHAR(1),                                                                                                                                                                                                                                                                                                            
  uchar_text TEXT,                                                                                                                                                                                                                                                                                                             
  uchar_char CHAR(1),                                                                                                                                                                                                                                                                                                          
  code_value VARCHAR(6),                                                                                                                                                                                                                                                                                                       
  character_name VARCHAR(64)                                                                                                                                                                                                                                                                                                   
) character set 'utf8mb4' collate 'utf8mb4_unicode_520_ci';                                                                                                                                                                                                                                                                    
};                                                                                                                                                                                                                                                                                                                             
$dbh->do($create_query);                                                                                                                                                                                                                                                                                                       

#   Failed test 'CHAR(1) 0020: SPACE'
#   at t/db_load_data.t line 160.
#          got: ''
#     expected: ' '
# CHAR(1) character 0020 does not round trip