my $string = '\\\\\\a';
# Unprocessed: \\\a
# Should be:   \a
# Result:      \\a