Hi Jon, you'll need Perl installed - http://www.perl.org on your computer or web server in order for your script to run.

On 5/25/06, J. D. <jpd9930@...> wrote:

do I need anything to run a program writen in pearl? I have the code. If no application is needed to need to make a macro to run it?

 

here is the code:

 

$_='while(read+STDIN,$_,2048){$a=29;$b=73;$c=142;$t=255;@t=map{$_%16or$t^=$c^=(
$m=(11,10,116,100,11,122,20,100)[$_/16%8])&110;$t^=(72,@z=(64,72,$a^=12*($_%16
-2?0:$m&17)),$b^=$_%64?12:0,@z)[$_%8]}(16..271);if((@a=unx"C*",$_)[20]&48){$h
=5;$_=unxb24,join"",@b=map{xB8,unxb8,chr($_^$a[--$h+84])}@ARGV;s/...$/1$&/;$
d=unxV,xb25,$_;$e=256|(ord$b[4])<<9|ord$b[3];$d=$d>>8^($f=$t&($d>>12^$d>>4^
$d^$d/8))<<17,$e=$e>>8^($t&($g=($q=$e>>14&7^$e)^$q*8^$q<<6))<<9,$_=$t[$_]^
(($h>>=8)+=$f+(~$g&$t))for@a[128..$#a]}print+x"C*",@a}';s/x/pack+/g;eval

 

I know nothing of code so you cant insult my intelligence on this issue....thanks

 

Jon

 

---

Love cheap thrills? Enjoy PC-to-Phone calls to 30+ countries for just 2¢/min with Yahoo! Messenger with Voice.

IMPORTANT ADDRESSES:

Post message: windows-tips@yahoogroups.com
Subscribe:  windows-tips-subscribe@yahoogroups.com 
Unsubscribe:  windows-tips-unsubscribe@yahoogroups.com
List owner:  windows-tips-owner@yahoogroups.com 
List URL: http://groups.yahoo.com/group/windows-tips

Windows Tips and Tricks Mailing List
windows-tips@yahoogroups.com
Don Roberts - Creator
http://www.drscripting.com

SPONSORED LINKS

Microsoft window	Windows 2000 operating system	Window operating system software
Windows operating system	Window 95 operating system	Windows me operating system

---

YAHOO! GROUPS LINKS

•  Visit your group "windows-tips" on the web.
   
•  To unsubscribe from this group, send an email to:
    windows-tips-unsubscribe@yahoogroups.com
   
•  Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service .

---

--
Don Roberts - don@...
http://www.donssandbox.com