use the flag g at the end of the regexp

$newstring =~ s/0/L/g;   # will substitute every appearence of 0 with 
+L
[download]

Hotshot