Try this:

        my $folder = Vim::get_view(mo_ref=> $vm->parent);

        unless ($folder->childEntity) {

                print "** Cleaning up the vm container folder.\n";

                $folder->Destroy_Task();

        }