> In the above, a "my" variable cannot be defined and be used within the same comma statement or logical "and" statement, hence the "my $line;" before the loop conditional.

In that case I'd prefer the c-style for(;;) loop ...

update

from https://perldoc.perl.org/perlsyn#For-Loops plus added my logic

for (my $i = 1; $i < 10; $i++) {
    ...
}
[download]

is the same as this:

{
    my $i = 1;
    while ($i < 10) {
        ...
    } continue {
        $i++;
    }
}
[download]