Guest wer

Das Map lässt sich besser schreiben: map { s/^->\s*(.*)$/$1/ }

das alleine wäre wohl keine so gute idee.
schau dir mal das ergebnis an. s/// liefert eine 1, wenn es eine ersetzung gemacht hat, nicht den string selbst.