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();