use strict;
use Win32::Shell;

#Win32::Shell::Execute(Operation, File, Parameters, Directory, ShowCmd)

my $file="C:\\windows\\desktop\\file.xls";
Win32::Shell::Execute("open", "$file", 1, undef, "SW_SHOW");