use DBIx::Simple;

my $db = DBIx::Simple->connect( ... );

my ($current_date) = $db->query('select current_date()')->list;