JFIFxxC      C  " }!1AQa"q2#BR$3br %&'()*456789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz w!1AQaq"2B #3Rbr#!/usr/bin/perl # # Authentic Theme (https://github.com/authentic-theme/authentic-theme) # Copyright Ilia Rostovtsev # Licensed under MIT (https://github.com/authentic-theme/authentic-theme/blob/master/LICENSE) # use strict; our (%in, %gconfig, %text, $pragma_no_cache, %theme_text, %theme_config); do($ENV{'THEME_ROOT'} . "/authentic-lib.pl"); $pragma_no_cache = 1; $ENV{'MINISERV_INTERNAL'} || die "Can only be called by miniserv.pl"; my $charset = &get_charset(); &PrintHeader($charset); print '', "\n"; print '', "\n"; embed_login_head(); print '' . "\n"; print '
' . "\n"; if ($in{'expired'} == 2) { print '
' . "\n"; print '  ' . $text{'password_temp'} . '' . "\n"; print '
' . "\n"; } else { print '
' . "\n"; print '  ' . $text{'password_expired'} . '' . "\n"; print '
' . "\n"; } # Start of the form print "$text{'password_prefix'}\n"; print '' . "\n"; print "$text{'password_postfix'}\n"; &footer();