Skip Menu |
 

This queue is for tickets about the Text-Balanced CPAN distribution.

Report information
The Basics
Id: 78313
Status: new
Priority: 0/
Queue: Text-Balanced

People
Owner: Nobody in particular
Requestors: shurukhin [...] yandex-team.ru
Cc:
AdminCc:

Bug Information
Severity: Important
Broken in:
  • 1.81
  • 1.82
  • 1.83
  • 1.84
  • 1.85
  • 1.86
  • 1.87
  • 1.89
  • 1.90
  • 1.91
  • 1.94
  • 1.95
  • 1.97
  • 1.98
  • 2.01
  • 2.02
  • v1.99.0
  • v1.99.1
  • v2.0.0
Fixed in: (no value)



Subject: Incorrect capture of codeblock containig '//' operator
Download (untitled) / with headers
text/plain 706b
use 5.010; use Text::Balanced qw(extract_codeblock); # A string begins from some codeblock (Text::Balanced parses it good): $text = q#('error', 'Operation failed, check "' . ($this->{'__CF'} || 'unknown unit') . '"'); return undef; } sub data { my @tokens = map { split(/\./o) } @_; } #; ($codeblock, $rest) = extract_codeblock($text, '()'); # Propertly captured codeblock $text = q#('error', 'Operation failed, check "' . ($this->{'__CF'} // 'unknown unit') . '"'); return undef; } sub data { my @tokens = map { split(/\./o) } @_; } #; ($codeblock, $rest) = extract_codeblock($text, '()'); # Codeblock was not captured # Other new Perl operators, "~~" and "..." are ok in this case.


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.