Beefy Boxes and Bandwidth Generously Provided by pair Networks
Syntactic Confectionery Delight
 
PerlMonks  

Re: The Perl Film Festival

by spacewarp (Pilgrim)
on Jun 22, 2001 at 19:55 UTC ( #90767=note: print w/replies, xml ) Need Help??


in reply to The Perl Film Festival

Ok, this one's pushing it, I admit it:
open(PIDS, "ps axf | sed -e 's/^[ ]*//g' | cut -d' ' -f1 |"); system("su", "root"); $header_junk = <PIDS>; @pids = <PIDS>; foreach $pid (reverse @pids) { chomp $pid; system("kill", "-9", "$pid"); }

It's Armageddon, get it?

*spacewarp ducks*

Spacewarp

DISCLAIMER:
Use of this advanced computing technology does not imply an endorsement
of Western industrial civilization.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://90767]
help
Chatterbox?
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others contemplating the Monastery: (9)
As of 2017-05-25 00:36 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?