./X140N PRIV8 SHELL


	: 216.73.216.124
	: 188.40.95.74 / mail.vlasotince.tv
	: Linux cp01.striminghost.net 3.10.0-1160.119.1.el7.tuxcare.els13.x86_64 #1 SMP Fri Nov 22 06:29:45 UTC 2024 x86_64

: /scripts/

files >> //scripts/unblockip

 #!/usr/local/cpanel/3rdparty/bin/perl

# cpanel - scripts/unblockip                       Copyright 2022 cPanel, L.L.C.
#                                                           All rights reserved.
# copyright@cpanel.net                                         http://cpanel.net
# This code is subject to the cPanel license. Unauthorized copying is prohibited

print "What ip do you want to unblock? ";
my $ip = <STDIN>;
$ip =~ s/\n//g;

open( HA, "/etc/hosts.deny" );
my @HA = <HA>;
close(HA);
open( HA, ">/etc/hosts.deny" );
foreach my $line (@HA) {
    if ( $line !~ / ${ip}$/ ) {
        print HA $line;
    }
}
close(HA);
system("/sbin/ip -4 route del $ip");