use strict;
use warnings;
use Win32::OLE;

my $filename = 'C:\refresh_test.xlsx';

my $Excel;
$Excel = Win32::OLE->new('Excel.Application', 'Quit');

$Excel->{DisplayAlerts} = "False";
$Excel->{Visible} = 1;  

my $wb = $Excel->Workbooks->Open($filename);

$wb->RefreshAll;

$wb->Save;
$wb->Close;

$Excel->Quit();