Dfyjkt

I have a question. I've got 2 different Excelsheets. From the first Excelsheet I want to extract some specific rows from specific columns into a row of an other Excelsheet. But I have problem with extracting the specific rows from the first Excelsheet with an Perl script. The function autofilter() and filter_columns() don't seem to work. This case is maybe a little complicated, but I would be vey happy if someone could help me.

<table><tbody><tr><th>Software</th><th> </th><th> </th><th>User</th><th> </th><th>Division</th></tr><tr><td>Software1</td><td> </td><td> </td><td>Pete;John</td><td> </td><td>Marketing</td></tr><tr><td>Software2</td><td> </td><td> </td><td>Jack;Pete</td><td> </td><td>Marketing</td></tr><tr><td>Software3</td><td> </td><td> </td><td>Jessica;Tina</td><td> </td><td>Sales</td></tr><tr><td>Software4</td><td> </td><td> </td><td>Timmy;Ron</td><td> </td><td>Finance</td></tr><tr><td>Software5</td><td> </td><td> </td><td>Pete;Oliver</td><td> </td><td>Marketing</td></tr></tbody></table>

This is what the Excelsheet looks like. Here for example I want to extract every software which is used by Pete and is in the Marketing division. These softwares I want to extract into another Excelsheet. But first I want to focus on the filtering of the data.
I am an absoulte beginner with programming. I could not do more than in the code below, where atleast I can extract all Software from the Excelsheet.

 use strict;
use warnings;
use Spreadsheet::WriteExcel;
use Spreadsheet::ParseExcel;
use Spreadsheet::ParseExcel::SaveParser;
use Spreadsheet::ParseExcel::Worksheet;
use WIN32::OLE::Const 'Microsoft Excel'
use Spreadsheet::WriteExcelXML;

# Open an existing file with SaveParser
my $parser = Spreadsheet::ParseExcel->new();
my $template = $parser->Parse('Softwarelist.xls');

# Get the first worksheet of Softwarelist Workbook
my $worksheet = $template->worksheet(0);

# Filtering Software Collumn
my $SELECT_COL = 0;

my ($row_min, $row_max) = $worksheet->row_range();
for (;$row_min<$row_max; )
 
 my $cell = $worksheet->get_cell($row_min, $SELECT_COL);
 next unless $cell;
 $cell = $cell->value();
 print "$celln"
 $row_min = $row_min +1;