Archive for 'perl' Category
So don't get me wrong, I'm still a great MS fan and everything… but come on… they could have tested their script before publishing it!
the failure: (source microsoft.com)
click here for full page
I'm releasing this today, but it's still in beta (Everything that used to work with my old 2.0.8 patch works with that version, but not all new features have been tested yet)
What you'll need:
-Perl (latest version if you can)
-A web server (wamp is good, but others should work fine as well)
What the script will do [...]
I'm using the binary decision tree approach to convert Morse Code to "Human"
Here's a part of the tree (not complete)
Lets decipher "— · —":
First mark is a dash -> next level and right node
Second mark is a dot -> next level and left node
Third mark is a dash -> next level and right node
"— · [...]
Windows >= 2000 only (or maybe NT4.0 SP6)
This is the cool solution, or you could parse the result of `ping -n 1 $ip > nul & arp -a` searching for $ip in the list (very slow and unpretty solution btw)
We will use two Windows dll ( iphlpapi.dll and wsock32.dll ) to import two functions ( [...]
Original idea: Microsoft Scripting Guys (link)
Ok, that's not that hard, some VBScript to Perl translation, a little modification and that's all!
I think it should work works remotely too (untested yet) by changing $strComputer with the targeted computer (you need some specific credentials).
Small perl script to find every printer in the active directory with perl
Again, perl is a great language which could help you to save a lot of time (administration scripts, …)
Here's a perl script to list every locked accounts in a container or an OU!