my $app = Win32::OLE->GetObject($mpp)
              or die "Couldn't open project";

	my $project = $app->Projects(1);
    $app->Tasks->Add("task title", $numberOfRow);