The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

XLS::Simple read xls, write xls

FUNCTION

read_xls

    my $header = read_xls( 'test.xlsx', only_header => 1, );

    my $data = read_xls( 'test.xlsx', skip_header => 1, );

    my $all = read_xls( 'test.xlsx');

write_xls

    write_xls([ ['测试', '写入' ] ], 
        'test.xlsx', 
        header=> ['一二', '三四'], 
        charset=>'utf8');