Skip Menu |
 

This queue is for tickets about the Rcs CPAN distribution.

Report information
The Basics
Id: 4731
Status: new
Priority: 0/
Queue: Rcs

People
Owner: Nobody in particular
Requestors:
Cc:
AdminCc:

Bug Information
Severity: Important
Broken in: 1.05
Fixed in: (no value)



Subject: Unmatched ) before HERE mark in regex m/(.*)\(.*) << HERE / at C:\Perl\site\lib/Rcs.pm line 353.
Download (untitled) / with headers
text/plain 205b
line 353 is if ($filename =~ m/(.*)$Dir_Sep(.*)/) { the easy fix would be to quotemeta that variable if ($filename =~ m/(.*)\Q$Dir_Sep\E(.*)/) { the proper solution would be to use File::Spec
and a few lines lower you have $filename =~ s/$arcext$//; which also needs a \Q\E


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.