diff --git a/bin/account-manager.pl.in b/bin/account-manager.pl.in
index 4c8f4e066c094271472a2e79f61300f86fb05754..520c60dd32ff54c8b4308d2422c50b20b6b05ad7 100755
--- a/bin/account-manager.pl.in
+++ b/bin/account-manager.pl.in
@@ -126,7 +126,7 @@ sub list_accounts {
     }
 
     if ($options{filter_expired}) {
-        push @{ $args{query} }, expiration_date => { lt => time };
+        push @{ $args{query} }, expiration_date => { lt => DateTime->now() };
     }
 
     my $accounts =