--- t-prot.orig
+++ t-prot
@@ -3,6 +3,7 @@
 
 require 5.006;
 use strict;
+use Locale::gettext;
 use Fcntl qw(O_EXCL O_WRONLY O_CREAT);
 use Getopt::Long qw(:config gnu_getopt no_ignore_case);
 use constant VER            => '3.0';