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`);