my @value;

##to get the headers of the excel file;
for my $row ( 0 .. 0 ) { 
	@value = map {
		my $cell = $worksheet->get_cell($row, $_);
		$cell ? $cell->value() : '';
	} @required_col;
}

##</code><code>##

##to get the headers of the excel file;
my @value = map {
	my $cell = $worksheet->get_cell(0, $_);
	$cell ? $cell->value() : '';
} @required_col;

##</code><code>##

sub changeformat {
    my ($header,$data) = @_;
    my @header = @$header;
    my @data = @$data;