Bad syntax highlighting for Perl code

[oscaretu]

Create a file called test.pl, with content:

sub leeFicheroAuxiliares 
{
    my $linea;

    ($id, $dato) = split /\|/, $linea; # the problem is in the backslash + pipe
    $hash{$id} = $dato;
} 

The syntax highlight is wrong, due to the backslash followed by a pipe:

If you remove them an put an "a", the syntax highlight is OK:

sub leeFicheroAuxiliares 
{
    my $linea;

    ($id, $dato) = split /a/, $linea; # I removed the backslash + pipe and put an "a"
    $hash{$id} = $dato;
}

Data about VSCode:

Version: 1.69.0 (system setup)
Commit: 92d25e35d9bf1a6b16f7d0758f25d48ace11e5b9
Date: 2022-07-07T05:28:36.503Z
Electron: 18.3.5
Chromium: 100.0.4896.160
Node.js: 16.13.2
V8: 10.0.139.17-electron.0
OS: Windows_NT x64 10.0.19044

[RedCMD]

Duplicate of #154706
Forwarded to textmate/perl.tmbundle#52

[alexr00]

Also a duplicate of upstream issue textmate/perl.tmbundle#28