in reply to Practical joke

For extra cruelty to those who hate ignoreeof, line 42 should be replaced with:
if($key eq "\x04") { print "Use \"logout\" to leave the shell.\n$prompt"; $index=0; next; }
Of course, they will hate whoever gets to be the scapegoat for this prank, too, since they'll now have to open a real terminal and kill it... :o)

--
Me spell chucker work grate. Need grandma chicken.