#!/bin/env perl
use strict;
use Spreadsheet::Read;
use Spreadsheet::XLSX;

my $lExcelFileData = ReadData("test.xlsx");
#Reading Price information from the input excel sheet using template information
my $lRate = $lExcelFileData->[1]{A1};
print "Rate in xlsx file-> ".$lRate . "\n";