The road goes ever on and on

[mrguy123]

My first attempt at a Perl Poem :)
Inspired by a movie I just saw and a book I read many times
original Poem:

The Road goes ever on and on
Down from the door where it began.
Now far ahead the Road has gone,
And I must follow, if I can,
Pursuing it with eager feet,
Until it joins some larger way
Where many paths and errands meet.
And whither then? I cannot say.

     ---Bilbo Baggins

And my very humble attempt:

use EagerFeat;
use constant{
    OnAndOn =>1,
    TRUE    =>1,
};

while ($Road == OnAndOn){
    if ($can){
        $follow = TRUE;
    }
    elsif (join(':', $Road,$larger_way)){
        meet($errands, $paths);
        last;
    }
}

$wither_then? cannot():say();

Mr Guy

[choroba]

I'd end it with

no feature 'say';
say wither_then();