diff --git a/util/SQLiteUtil.pm b/util/SQLiteUtil.pm
index 3f9f2f7..9eee18b 100644
--- a/util/SQLiteUtil.pm
+++ b/util/SQLiteUtil.pm
@@ -360,7 +360,7 @@ sub as_num {
 
 sub dotted {
   my $self = shift;
-  join '.', map {$_ + 0} $self->[3] + 0 ? @$self : @$self[0..2];
+  join '.', map {$_ + 0} ($self->[3] && $self->[3] + 0) ? @$self : @$self[0..2];
 }
 
 sub year {