Beefy Boxes and Bandwidth Generously Provided by pair Networks
There's more than one way to do things

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 all is quiet...

How do I use this? | Other CB clients
Other Users?
Others cooling their heels in the Monastery: (3)
As of 2018-02-25 17:52 GMT
Find Nodes?
    Voting Booth?
    When it is dark outside I am happiest to see ...

    Results (314 votes). Check out past polls.