get harddisk serial or other characteristic info for copyprotection

? ?

foreach (`/sbin/ifconfig -a`) {m/^eth0\s+/ && do { @x=split(/\s+/,$_);$mac=$x[$#x]; };}

hi ahoffmann,
the code above didn't work. the script returns nothing and seems to hang.

kind regards
ItsMe

which OS?

2000

hi ahoffman,
do you think there is another way to copyprotect compiled perl scripts, which will work on all systems ? I'm thinkin on perl specific functions so that I don't need windows software (sure is sure :-)...

kind regards
ItsMe

what do you want to achieve, just inhibit that people change the script, or that people view the script?

> i want to copyprotect my compiled perl program.
ok, how did you compile it?
Compilation is usualy done by perl.exe at startup.

Copyprotect? That's difficult with scripts, 'cause everyone who understands the code is able to modify it in that way that it matches his requirements and not yours, bypassing the copy-check.

Why do you realy insist on having the functinality implemented in perl (instead of c or c++ or any other compiled language)?

hi ahoffmann,
i'm compiling the script with perl2exe, i think that perl just interprets the script :-) once the script is an exe file you can no longer modify it. i'm working on a server solution and don't want anybody to use my files without permission.

kind regards
ItsMe

so using ipconfig might be ok for newbies.
You also may use some values of the registry (AFAIK perl has a NT-Registry module).