Select Code to Download

    #         @a      @b        @a       @b
    # same?  range   range    values   values
...
             8,      9,      #  n p  !  r s t
            10,     12,      #
    );

    # old loop code
    ########################################
...
        splice @$diff, 0, 2;
        # ...
    }

    my $diff= Algorithm::Diff->new( \@a, \@b );
    $diff->base( 1 );   # Return line numbers, not indices
...
        print $sep;
        print "> $_"   for  $diff->bRange();
    }