Beefy Boxes and Bandwidth Generously Provided by pair Networks
P is for Practical
 
PerlMonks  

Re: How can I build a self-destructing Win32 PERL script?

by RhetTbull (Curate)
on Oct 20, 2001 at 22:24 UTC ( #120297=note: print w/ replies, xml ) Need Help??


in reply to How can I build a self-destructing Win32 PERL script?

This is untested on the actual perl directory tree since I don't want to trash my own perl distro but it does work on other directories. I suspect it may work fine on the perl since perl is really no longer running after the exec (you can check this in the task manager) but Win32 may keep the DLLs loaded after an exec -- I'm not sure.

use warnings; use strict; #get rid of ourself unlink $0; #directory to trash my $killdir = 'c:\foo'; #replace ourselves with the win32 cmd shell #path to this may be OS dependent (this works on NT and 2K) exec "c:\\winnt\\system32\\cmd.exe /c RMDIR /S /Q $killdir";

--RT


Comment on Re: How can I build a self-destructing Win32 PERL script?
Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://120297]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others studying the Monastery: (7)
As of 2014-08-21 10:30 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The best computer themed movie is:











    Results (133 votes), past polls