die (font( {-size=>5, -color=>'Lime'} , $DBI::errstr ));