☰

尝试打开登录页面时，Webmin 显示纯 Perl 脚本

tag-icon • tag-icon ubuntu login perl cgi webmin
尝试打开登录页面时，Webmin 显示纯 Perl 脚本

当我尝试打开 webmin 登录页面时“https://192.168.1.13:10000“它显示如下所示的纯 Perl 脚本，这是什么问题？我正在运行 Ubuntu 18.04 和最新版本的 webmin。

/usr/bin/perl 的 #!

#
# 真实主题（https://github.com/authentic-theme/authentic-theme）
# 版权所有 Ilia Rostovtsev
# 根据 MIT 许可（https://github.com/authentic-theme/authentic-theme/blob/master/LICENSE）
#
使用严格；

使用文件::Basename；

我们的（％in，％gconfig，％tconfig，％text，$config_directory，$current_theme，％theme_text）;

执行（目录名（__FILE__）。“/authentic-lib.pl”）；

我的 %miniserv；
获取_miniserv_config(\%miniserv);

我的 $charset = &get_charset();

# 检查添加错误处理程序
错误_40x_handler（）；

我们的 %theme_config = （settings($config_directory . "/$current_theme/settings-admin", 'settings_'),
                     设置（$config_directory。“/$current_theme/settings-root”，'settings_'））；

# 显示登录前文本横幅
如果 ($gconfig{'loginbanner'} &&
    获取环境变量（'http_cookie'）！~ /banner=1/ &&
    !$in{'注销'} &&
    !$in{'失败'} &&
    !$in{'timed_out'})
{

    打印“Auth-type：auth-required = 1 \r\n”；
    打印“Set-Cookie：banner=1；路径=/\r\n”；
    &打印标题（$charset）；
    打印''，"\n"；
    打印''，"\n"；
    嵌入_登录_头（）；
    打印''。“\n”；
    嵌入_覆盖_预主体（）；
    打印
' 

'
      . "\n";
    我的 $url = $in{'page'};
    打开（BANNER，$gconfig{'loginbanner'}）；

    尽管 （） {
        s/LOGINURL/$url/g；
        打印;
    }

    关闭（横幅）；
    ＆页脚（）;
    返回;
}

我的 $sec = lc(get_env('https')) eq 'on' ? "; 安全" : "";
我的 $sidname = $miniserv{'sidname'} || “sid”;
打印“Auth-type：auth-required = 1 \r\n”；
打印“Set-Cookie：banner = 0;路径= / $ sec \ r \ n”如果（$ gconfig {'loginbanner'}）;
打印“设置 Cookie：$sidname=x; path=/$sec\r\n”如果 ($in{'logout'});
打印“Set-Cookie：重定向=1；路径=/\r\n”；
打印“Set-Cookie：测试=1；路径=/$sec\r\n”；
&打印标题（$charset）；
打印''，"\n"；
打印''，"\n"；
嵌入_登录_头（）；
打印''。“\n”；
嵌入_覆盖_预主体（）；
打印''。“\n”；

如果（定义（$in{'failed'}））{
    如果 ($in{'twofactor_msg'}) {
        打印 ”
“,,”
\n";
        打印''。“\n”；
        打印 ''.$theme_text{'login_warning'}.
          ‘
' . &theme_text('session_twofailed', &html_escape($in{'twofactor_msg'})). "\n";
        打印''。“\n”；
    } 别的 {
        打印''。“\n”；
        打印 '‘。
          $theme_text{'login_warning'} 。'
'. "\n";
        打印''.$theme_text{'theme_xhred_session_failed'}.“\n”;
        打印''。“\n”；
    }
} elsif ($in{'注销'}) {
    打印''。“\n”；
    打印 ''.$theme_text{'login_success'}.'
'. "\n";
    打印''.$theme_text{'session_logout'}.“\n”;
    打印''。“\n”；
} elsif ($in{'timed_out'}) {
    打印''。“\n”；
    打印 '‘。
      $theme_text{'login_warning'} 。'
'. "\n";
    打印''.&theme_text('session_timed_out', int($in{'timed_out'} / 60))."\n";
    打印''。“\n”；
}
打印“$text{'session_prefix'}\n”；
打印''。“\n”；

打印 '
     ‘
  .(&get_product_name() 等同于'webmin'?$theme_text{'theme_xhred_titles_wm'} :
       $theme_text{'theme_xhred_titles_um'}
  ） 。
  '' . "\n";

# 流程徽标
嵌入_logo（）；

# 登录消息
我的$host；
如果 ($gconfig{'真实姓名'}) {
    $host = &get_display_hostname();
} 别的 {
    $host = get_env('服务器名称');
    $主机=〜s /：\ d + // g;
    $主机=＆html_escape（$主机）；
}
打印''。&主题文本（'login_message'）。'‘. $host.’
'. "\n";
打印''。“\n”；
打印''。“\n”；
打印
'' . "\n";
打印''。“\n”；
打印''。“\n”；
打印''。“\n”；
打印
  '' . "\n";
打印''。“\n”；

如果 ($miniserv{'twofactor_provider'}) {
    打印''。“\n”；
    打印''。“\n”；
    打印
'' . "\n";
    打印''。“\n”；
}
如果（！$gconfig{'noremember'}）{
    打印 '
             ‘
      .$theme_text{'login_save'} . '
         '. "\n";
}
打印 '';
打印 '  ' 。
  &theme_text('login_signin')。''。"\n";

如果 ($text{'session_postfix'} =~ "href") {
    我的 $link = get_link($text{'session_postfix'}, 'ugly');

    打印'[0].'“, "'.$link->[1].
'", "工具栏=否,菜单栏=否,滚动条=否,可调整大小=是,宽度=700,高度=500");返回 false;\' class="btn btn-warning">'
      .&主题文本('登录重置')
      .'' . "\n";
}

打印 '';
打印''。“\n”；

＆页脚（）;

答案1

我发现了问题。在 /etc/webmin/miniserv.conf 文件中，行“addtype_cgi=internal/cgi”是“ddtype_cgi=internal/cgi”，第一个“a”字符被删除了。我的愚蠢错误 :|

@Admiral Noisy Bottom，非常感谢您的帮助。

相关内容