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

my $xl = Win32::OLE->new('Excel.Application');
$xl->{EnableEvents} = 0;
$xl->{Visible} = 1;

my $wb = $xl->Workbooks->Add;
my $sht = $wb->Sheets(1);
$sht->{Name} = "RVG_Engines";

$sht->Cells(1,1)->{Value} = "Title Row";
$sht->Cells(2,1)->{Value} = "Data 1";
$sht->Cells(3,1)->{Value} = "Data 2";
$sht->Cells(4,1)->{Value} = "Data 3";

$sht->Cells(2,1)->EntireRow->Insert;