Perl to C++

Hi there, I dont know how to perl. Can anybody convert this code (sub routine) from perl to C++. I would be very much grateful sub OleUnpackPackages { my($this, $explodeinto, $parentname, @NativeFilenames) = @_; my($infh, $byte, $number, $buffer, $outname); my($finished); OLEFILE: foreach my $inname (@NativeFilenames) {