Help for this page

Select Code to Download


  1. or download this
    my $converter = Text::Iconv->new("utf-8","windows-1251");
if ( !$excelFile ){
...
seek($fh,0,0);
my $excel = Spreadsheet::XLSX -> new ($fh,$converter);
#(convert to html here)
  2. or download this
    my $file = shift @ARGV;
 my $converter = Text::Iconv->new("utf-8","windows-1251");
my $excel = Spreadsheet::XLSX -> new ($file, $converter);
die "open failed" unless $excel;
#(convert to html here)