use strict;
use warnings;
use Spreadsheet::Read;

my $book  = Spreadsheet::Read->new ("file.xlsx");
my $sheet = $book->sheet (1);
my $a3    = $sheet->cell ("A3");