X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=infobot;h=ff2b0a0640de1ed44d92ca9df639732665232218;hb=e59135bba96d76f54f9405b297b8ef7e7c22ac9f;hp=e0c1ad20d65ad887036212802e8f4a60e2b1078f;hpb=2881da99e710042422b523987a3d3a8c5511d8e8;p=infobot.git

diff --git a/infobot b/infobot
index e0c1ad2..ff2b0a0 100755
--- a/infobot
+++ b/infobot
@@ -11,6 +11,11 @@ use vars qw($bot_base_dir $bot_src_dir $bot_misc_dir $bot_state_dir
   $bot_pid $memusage %param
 );
 
+# ancient Perl may not like these, but modern systems should have this
+use open ':utf8';
+use open ':std';
+use Encode qw( decode FB_QUIET );
+
 BEGIN {
     if ( @ARGV and -f $ARGV[0] ) {