sub job { my $work=new Job::Task(Difficulty => 'Impossible', Deadline => 'Yesterday', Team => ['me']); my $self=new Geek(Feeling => 'tired', Caffiene => 0); if($self) { $self->brain("FRIED"); if(!$work) { sleep; } else { $work->harder until (($work->State() eq 'done') || !$self->find("MT Dew")); } if(($work->State() eq 'done') && $self->alive()) { &job; } else { die; } } }