Select Code to Download

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