my @daten = map { defined $_ ? $_ : 'NULL-Alternative' } $sth->fetchrow_array() ;

# Ab perl 5.10 geht auch
my @daten = map { $_ // 'Anstelle von ...' } $sth->fetchrow_array() ;