One Hat Cyber Team

Your IP: 216.73.216.133
Server IP: 185.119.109.197
Server: Linux managedhosting.chostar.me 5.15.0-160-generic #170-Ubuntu SMP Wed Oct 1 10:06:56 UTC 2025 x86_64
Server Software: Apache
PHP Version: 8.1.33
Buat File | Buat Folder

View File Name : recovery.cgi

#!/usr/bin/perl
# Set or clear the user's recovery address

require './changepass-lib.pl';
&error_setup($text{'recovery_err'});
&ReadParse();

# Save or clear
if ($in{'recovery_def'}) {
	&save_recovery_address(undef);
	}
else {
	$in{'recovery'} =~ /^\S+\@\S+$/ || &error($texy{'recovery_eemail'});
	&save_recovery_address($in{'recovery'});
	}

# Tell the user
&ui_print_header(undef, $text{'recovery_title'}, "");

if ($in{'recovery_def'}) {
	print $text{'recovery_cleared'},"<p>\n";
	}
else {
	print &text('recovery_set',
		"<tt>".&html_escape($in{'recovery'})."</tt>"),"<p>\n";
	}

&ui_print_footer("", $text{'index_return'});