Hi there Monks!
The issue here is when reading this spreadsheet it has a title for the zip code, first name and last name columns
What I am trying to do is to ignore the column names read just the data and when there is no more data send the "DONE",
because I need to send it as a flag to another process. But here its seeing the column header first and sending the DONE, because
it does match on the “ELSE”. Is there a way to force the code to read the spreadsheet in reverse, that way I will know when I reach the end of it and then
send the DONE as flag, meaning that I reach the each of the file or ending of reading this spreadsheet?

#!/usr/bin/perl

use strict;
use warnings;
use Spreadsheet::ParseExcel;
use DateTime::Format::Excel;
use Data::Dumper;

  
...

   foreach my $worksheet (@{$excel_sheet -> {Worksheet}}) {
        
    $worksheet -> {MaxRow} ||= $worksheet -> {MinRow};

    # Skip worksheet if it doesn't contain data.
    next if $worksheet -> {MinRow} > $worksheet -> {MaxRow};
    
    foreach my $row ($worksheet->{MinRow} .. $worksheet->{MaxRow}) {

      # Correct values or skip them:
      next unless defined $worksheet->{Cells}[$row][0]->{Val};
      
      warn Dumper $worksheet->{Cells}[$row][0]->{Val};
      
      if ( $worksheet->{Cells}[$row][0]->{Val} =~ /^\d{5}/ ) {

        my $xlsx_rows = $worksheet->{Cells}[$row];
    
        # Send data
        send_data( 
                   zipcode    => $xlsx_rows->[0]->{Val}  || '',
           firstname  => $xlsx_rows->[1]->{Val}  || '',
           lastname   => $xlsx_rows->[2]->{Val}  || '',
                             
                           );
       
     }else{

        # Send flag as DONE once it reach the end of file or if there 
+is no data
        send_data( 
           zipcode => 'DONE',  # Flag
                  );

      }
      
    }

  }
  
...
[download]

The warn Dump printing results

DONE
01111
02334
09999
[download]

I need to be like this:

01111
02334
09999
DONE
[download]

Thanks for looking!