Select Code to Download

    perl smplls.pl Book1.xls

...
    01      1 'Workbook' (pps 1)                      FILE       1000 
+bytes
    02      2 ' SummaryInformation' (pps 2)           FILE       1000 
+bytes
    03      3 ' DocumentSummaryInformation' (pps 3)   FILE       1000 
+bytes

    #!/usr/bin/perl

...
    # Remember to use binmode() on Windows.
    print $data;