Catering for multiline input and assuming backspaces at beginning of lines should simply be removed:

$s = "\b\bthis is an\b correct\b\b\b usage\b\n\b2nd\n\b\b3rd\n";
$s =~ s/^[\b]+//mg;
1 while $s =~ s/[^\b][\b]//g;
[download]

/-\