my $foo = 'bar';
sub process_challenge {
    my $challenge = shift;
    # hier fehlt $foo
}
$le->accept_challenge(\&process_challenge);