Today is: 14 January, 2012
Check todays hot topics
This script will crawl fukung.net and grab every image it see's. We attempt to create an archive resembling media.fukung.net's directory structure.
The neat thing is it preserves image tags in the database. I figured, what good is it to have a fuck ton of images in a fuck ton of directories if they're not even sensibly organized. For every image we insert we keep track of it's class('sfw', 'nsfw') and it's tags (if any).
Compile a txt file of image urls, download the images, resize them. Pretty simple, pretty ghetto. This is a proof for something much larger I will post a later date. This requires Image::Resize which requires GD.
#!/usr/bin/perl use strict; use warnings; use Data::Dumper; use Image::Resize; use LWP::UserAgent; use Getopt::Long; my $x; my $y; my $url; my $input; my $outdir; my $verbose = 1; sub do_options { my $var = GetOptions( 'i|input=s' => \$input, 'u|url=s' => \$url,
We wrote this to cheat on an internet poll. At first we were using the Proxy Spider to gather proxies and iterate through them with LWP::UserAgent. *THAN* we discovered ProxyHopper exists, and we set out on rigging internet polls across the land. My favorite internet polls are ones that use the GET method. This will require heavy modification to work anywhere other than it's intended target. It shouldn't be too hard.
This is nothing new. Apparently, there was an API google provided to the public for quick google searches in your code. I imagine people abused this horribly to write email harvesting bots (stay tuned for that). For whatever reason google shut this down. :(
Where there's a will there's a way, right? Using LWP::UserAgent you can create a google object and query for given search terms and request a dynamic number of paged results.
This is not my idea. This is a spinoff of a C app that a friend (chrak) wrote to harvest Adsense ID's. I will be sure to link his paper on this as soon as I find a link.
