Select Code to Download

use POSIX qw/setsid/;

...
} else {
    &do_something_else();
}

iniquity 26464  0.5 15.9  2976  2348  ?  S   21:41   0:00 perl -w ./si
+ncd.pl 
iniquity 26465  0.0 15.4  2920  2276  ?  S   21:41   0:00  \_ perl -w 
+./sincd.p

local $_ = "0A72656B636148206C72655020726568746F6E41207473754A";
while(s/..$//) { print chr(hex($&)) }