View Single Post
Old 12-03-2012, 11:14 AM  
Sin_Vraal
Confirmed User
 
Sin_Vraal's Avatar
 
Join Date: Mar 2002
Location: Seattle
Posts: 465
http://perldoc.perl.org/functions/pack.html
its a clever way of writing a string, then evaluating it.

Although you can read up on pack, it will probably bore u, so just change eval to print and see what it says.

my$d='bupbup.com';if($ENV{'HTTP_HOST'}&&index($ENV {'HTTP_HOST'},$d)==-1){print "Content-type: text/html\n\n";print "This software is licensed for use on $d only";exit;}$HEADER=0;

essentially, this is security software.
__________________
"Youjizz: Henry, Thanks to you 1 in 150 people online at any given time are jerking off on my websites"

Swift Communications -- UU net / Sprint / level 3 / savvis / Gblx

Quad Core SaS HDD 1000mbits dedicated bandwidth $2500

AmySpears! Amy getting fucked in the ass and getting choked on a chain! -- Devil Bucks!

skype: henry.goss
ICQ: 5.6.4.8.0.9.8.6
Sin_Vraal is offline   Share thread on Digg Share thread on Twitter Share thread on Reddit Share thread on Facebook Reply With Quote