Hm, so wie ich das sehe, liegt das Problem schon in Zeile 9:

Perl sieht da \090 als ungültige Oktalzahl.
Versuch mal, als Trenner statt \ / oder \\ zu nehmen.