...
use Data::Dumper;
...
my @ref_header = ( 
	   [ ["Name", "Surname"] ],
    );
...
@ref_db_data = $sth->fetchall_arrayref;