Question: how to extract data from excel sheet in perl?
Answer: #!/usr/bin/perl. use 5.010; use Spreadsheet::Read qw(ReadData); my $book = ReadData('simple.xlsx'); say 'A1: ' . $ book->[1]{A1}; my @row = Spreadsheet::Read::row($book->[1], 1); for my $i (0 .. $# row) { say 'A' . ($ i+1) . ' ' . ($ row[$i] // '');