You can use a simple substitution. [LW] is a character class containing both L and W, the final /g is needed to replace both the letters.

$string =  "(L 2 W 7)";
$string =~ s/[LW] //g; # Replace L or W followed by a space by nothing
+.
print $string, "\n";
[download]