Select Code to Download

use warnings;
use Win32::OLE;
...
}
    $wb->{DisplayAlerts}=0;
    $wb -> Close;

use warnings;
use Win32::OLE;
...
    $wb->{DisplayAlerts}=0;
        $wb->Save();
    $wb -> Close;