Is there a way to rename slices through scripting?

I have a document with hundreds of icons, each organized into its own layer, and each layer containing it's slice.

Opening the Slice Options dialog to rename the slices to the same name as the layer is extremely slow, probably because I have too many slices.

So I wanted to make a script that goes through all my layer's and renames each slice it finds with the name of the parent layer.

Is that possible? I haven't found any examples that rename a slice.

Thanks!

Anthony