diff --git a/cataloguing/value_builder/unimarc_field_100.pl b/cataloguing/value_builder/unimarc_field_100.pl
index 3f936a4dbd..99798e6714 100755
--- a/cataloguing/value_builder/unimarc_field_100.pl
+++ b/cataloguing/value_builder/unimarc_field_100.pl
@@ -20,6 +20,7 @@
 
 use strict;
 #use warnings; FIXME - Bug 2505
+use Date::Calc qw( Today );
 
 use Koha::Util::FrameworkPlugin qw(wrapper);
 use C4::Auth;