Holger: Funktion, um Leerzeichen in Liste zu löschen ???

Beitrag lesen

Hallo,
ich habe folgendes Problem:
In meinem Skript gibt es eine Liste @musikplan, in der Einträge ungefähr so vorhanden sind:
$musikplan[0] "   James & Diane   Hits From UK`s Finest"
$musikplan[1] "   Alan Graham           Rock Pop & Sax"
$musikplan[2] "   Jimmi                  Modern Music"
etc..

Gibt es eine Funktion, mit der ich alle Leerzeichen bis auf jeweils eines zwischen den Wörtern in den einzelnen Elementen löschen kann?
Ich weiss, dass der entsprechende reguläre Ausdruck /\s+2/ heisst; möchte aber idealerweise umständlichen Quelltext umgehen.
Welchen Befehl kann ich anwenden?