Select Code to Download

Select or download this

print("Before creating new Spreadsheet::ParseExcel::Stream:\n" . `free
+ -m`);
    my $ExcelParser = Spreadsheet::ParseExcel::Stream->new($FileName);
print("After creating new Spreadsheet::ParseExcel::Stream:\n" . `free 
+-m`);

Select or download this

Before creating new Spreadsheet::ParseExcel::Stream:
             total       used       free     shared    buffers     cac
+hed
...
Mem:          3011       2257        753          0          2        
+177
-/+ buffers/cache:       2077        933
Swap:          956        177        779