my $NumbFiles = Variant(VT_EMPTY);

$SOS->GetFileAgesValue({
    ...
    NumFiles => $NumbFiles,
});

...

print $NumbFiles;