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

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";


Log In?

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

How do I use this? | Other CB clients
Other Users?
Others pondering the Monastery: (2)
As of 2021-02-25 03:26 GMT
Find Nodes?
    Voting Booth?

    No recent polls found