• Howdy! Welcome to our community of more than 130.000 members devoted to web hosting. This is a great place to get special offers from web hosts and post your own requests or ads. To start posting sign up here. Cheers! /Peo, FreeWebSpace.net
managed wordpress hosting

what the hell!!!!!

Status
Not open for further replies.
here here:

#!/usr/bin/perl

$defaulturl = "http://www.otashki.cjb.net";

@okaysites = ("http://www.otashki.cjb.net", "http://otashki.hypermart.net");

$url_1 = "http://otashki.hypemart.net/images";
$url_2 = "http://otashki.hypemart.net/wallpapers";
$url_3 = "http://otashki.hypemart.net/pocards";
$url_4 = "http://otashki.hypemart.net/cibooks";
$url_5 = "http://otashki.hypemart.net/downloads";

@querypairs = split(/&/, $ENV{'QUERY_STRING'});
foreach $querypair (@querypairs) {
($queryname, $queryvalue) = split(/=/, $querypair);
$queryvalue =~ tr/+/ /;
$queryvalue =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$queryvalue =~ s/<([^>]|\n)*>//g;
if ($QUERY{$queryname}) { $QUERY{$queryname} = $QUERY{$queryname}.",".$queryvalue; }
else { $QUERY{$queryname} = $queryvalue; }
}

$reffer = $ENV{'HTTP_REFERER'};
$yes = 0;
foreach $domain (@okaysites) {
if ($reffer =~ /$domain/) {
$yes = 1;
}
}

$theu = "url"."_"."$QUERY{'site'}";

if ($$theu && $yes == 1) {
print "Location: $$theu/$QUERY{'filename'}\n\n";
} else {
print "Location: $defaulturl\n\n";
}
exit;

oh and nice avatar meow it tells every1 what u are like
 
The longest thread in the history of webdesign/HTML forum thanks to a weeper, a guy with big tits and oh yeah Lucifer thrown in :D
 
Originally posted by lastactionhero
The longest thread in the history of webdesign/HTML forum thanks to a weeper, a guy with big tits and oh yeah Lucifer thrown in :D


I meant a weeper and a guy wuth big tits and Lucifer. Notice the emphasis on and.
 
Yeah. It must be that simple after all since weeps' main URL goes there now.
They must have it really crappy set up. I mentioned earlier that I tested http://otashki.hypemart.net/blah.html and it simple doesn't load. The browser kind of hangs. When I paste some of the links into the address field I get an ordinary 404 but when I click them I get megago. GO FIGURE! :mad:
 
try


$url_1 = "http://otashki.hypermart.net/images";
$url_2 = "http://otashki.hypermart.net/wallpapers";
$url_3 = "http://otashki.hypermart.net/pocards";
$url_4 = "http://otashki.hypermart.net/cibooks";
$url_5 = "http://otashki.hypermart.net/downloads";

then I suggest shooting yourself
 
Status
Not open for further replies.
Back
Top