print qq/ I crave your life. I thirst for your energy. /; $please {stop}=>LISTENING; for $I (( tell(HORRORS) )){ $I=>live=>forever, $I=>sleep(little), $I=>never=>die, unless $I=>leave, my $home, the=>(crypt( IN_THE, BRIGHT_SUNLIGHT )) or $FEEL=>the=>wood=>pierce{'my cold heart'}; };