Your message dated Mon, 12 Aug 2013 18:04:11 +0000 with message-id <[email protected]> and subject line Bug#718209: fixed in perl 5.18.1-1 has caused the Debian Bug report #718209, regarding perl-base: m//p doesn't work if precompiled regex doesn't use it to be marked as done.
This means that you claim that the problem has been dealt with. If this is not the case it is now your responsibility to reopen the Bug report if necessary, and/or fix the problem forthwith. (NB: If you are a system administrator and have no idea what this message is talking about, this may indicate a serious mail system misconfiguration somewhere. Please contact [email protected] immediately.) -- 718209: http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=718209 Debian Bug Tracking System Contact [email protected] with problems
--- Begin Message ---Package: perl-base Version: 5.18.0-3 Severity: normal File: /usr/bin/perl If a regex is precompiled with qr//, but without /p, and then used in $text =~ /$pat/p, the ${^POSTMATCH} variable is undefined. If I use qr//p instead, everything works fine. This did work in Perl 5.14, so I expect that despite the bad style, it should work in Perl 5.18. The attached test case will die in Perl 5.18. -- System Information: Debian Release: jessie/sid APT prefers unstable APT policy: (500, 'unstable'), (1, 'experimental') Architecture: amd64 (x86_64) Foreign Architectures: i386 Kernel: Linux 3.10-1-amd64 (SMP w/4 CPU cores) Locale: LANG=en_US.UTF-8, LC_CTYPE=en_US.UTF-8 (charmap=UTF-8) Shell: /bin/sh linked to /bin/dash Versions of packages perl-base depends on: ii dpkg 1.17.0 ii libc6 2.17-7 perl-base recommends no packages. Versions of packages perl-base suggests: ii perl 5.18.0-3 -- no debconf information -- brian m. carlson / brian with sandals: Houston, Texas, US +1 832 623 2791 | http://www.crustytoothpaste.net/~bmc | My opinion only OpenPGP: RSA v4 4096b: 88AC E9B2 9196 305B A994 7552 F1BA 225C 0223 B187#!/usr/bin/perl use v5.14; use strict; use warnings; transform_named_escapes("foo\\n(AB", "n", "n"); sub transform_named_escapes { my ($text, $char, $type) = @_; my $ec = "\\"; # The more complex forms are first because \X will match a ( or [. my $pat = qr/\Q$ec$char\E(\((\X{2})|\[(\X*?)\]|(\X))/; # We might end up with something like \*(\*(NA. In this case, parse the # second escape first, and then stick that into the proper place. while ($text =~ /$pat/p) { my $desc = $1; my $name = $2 || $3 || $4; my ($pre, $post) = (${^PREMATCH}, ${^POSTMATCH}); die unless defined ${^POSTMATCH}; } return $text; }
signature.asc
Description: Digital signature
--- End Message ---
--- Begin Message ---Source: perl Source-Version: 5.18.1-1 We believe that the bug you reported is fixed in the latest version of perl, which is due to be installed in the Debian FTP archive. A summary of the changes between this version and the previous one is attached. Thank you for reporting the bug, which will now be closed. If you have further comments please address them to [email protected], and the maintainer will reopen the bug report if appropriate. Debian distribution maintenance software pp. Niko Tyni <[email protected]> (supplier of updated perl package) (This message was generated automatically at their request; if you believe that there is a problem with it please contact the archive administrators by mailing [email protected]) -----BEGIN PGP SIGNED MESSAGE----- Hash: SHA1 Format: 1.8 Date: Mon, 12 Aug 2013 18:26:06 +0300 Source: perl Binary: perl-base libcgi-fast-perl perl-doc perl-debug libperl5.18 libperl-dev perl-modules perl Architecture: source all amd64 Version: 5.18.1-1 Distribution: experimental Urgency: low Maintainer: Niko Tyni <[email protected]> Changed-By: Niko Tyni <[email protected]> Description: libcgi-fast-perl - CGI::Fast Perl module libperl-dev - Perl library: development files libperl5.18 - shared Perl library perl - Larry Wall's Practical Extraction and Report Language perl-base - minimal Perl system perl-debug - debug-enabled Perl interpreter perl-doc - Perl documentation perl-modules - Core Perl modules Closes: 711206 714408 718209 Changes: perl (5.18.1-1) experimental; urgency=low . [ Dominic Hargreaves ] * Apply patch from upstream fixing Digest::SHA double-free crash (Closes: #711206) . [ Niko Tyni ] * Amend the perlbug patchlevel fix for #710842 so that the list of local patches is looked up at perlbug run time. * Fix the permissions of the md5sums control files in the binary packages. (Closes: #714408) * Import new upstream release. + update Breaks versions for the libmodule-corelist-perl and libdigest-sha-perl packages. * Apply upstream patches to (partially) fix qr// precompilation and the /p flag. (Closes: #718209) * Add Breaks and Replaces entries for older versions of the (deprecated) libobject-accessor-perl package. Checksums-Sha1: 077e0a48016a357594439a6081c094c5c7777928 1713 perl_5.18.1-1.dsc eb6b402682168a9735b2806d09c1ca5d567b2de8 14059628 perl_5.18.1.orig.tar.bz2 7b49914b1d4ea327f6d1a1d7e77123d08cd41330 129471 perl_5.18.1-1.debian.tar.gz ea2273eec935059f641eead18cb42310764df8dc 77068 libcgi-fast-perl_5.18.1-1_all.deb 72362f9c9e9566d395980db1e11b94db4a5a06b4 7308310 perl-doc_5.18.1-1_all.deb 60343043303351a324eeb051c5b2bb01ee061589 2741058 perl-modules_5.18.1-1_all.deb 4d326b332b5dce037152e8c199c10bb7a1ad5b84 1147500 perl-base_5.18.1-1_amd64.deb 28a04d63ff9cf92feb93a466b0c4c288f8aa4532 4993144 perl-debug_5.18.1-1_amd64.deb d3c33c0dd0375a99e8f2d2e3fa7a28ec1a61ad8f 1226 libperl5.18_5.18.1-1_amd64.deb 2bdf0ceadfc0c6fd193440f0fb5c7cfb1f527859 2275560 libperl-dev_5.18.1-1_amd64.deb d163505666dd93c0d3a72f13b96968b81d187736 2649620 perl_5.18.1-1_amd64.deb Checksums-Sha256: e188dd04d7fc255708cdc45e09f5d8e0d16d0f5a3a34409ee562d5b98826db78 1713 perl_5.18.1-1.dsc bf46c732c68fb160ea276b4b0cda26971646a206e31951abb8623a60f0ee5249 14059628 perl_5.18.1.orig.tar.bz2 4cb532e85c281653b3fe711074de4edc868f6657fd10e03f39719847aaced9da 129471 perl_5.18.1-1.debian.tar.gz 024457cda25b76b5fb45fdb29409c43f80219e2f6c2e7d50f31b4c1915d3fcdf 77068 libcgi-fast-perl_5.18.1-1_all.deb 680a63773cc601adccd39f65d655b121ec2f3811da7308b609b311fd82fb76d7 7308310 perl-doc_5.18.1-1_all.deb 5bf7d4ec9fe0aa59c64288d34af80ddf956bacdcc7ad64b445d0fe90b8c756cc 2741058 perl-modules_5.18.1-1_all.deb 8dc0ad381522a3a27c7cd9d3ed9f98f2f1088fec40d8334620ff3656d1488fbc 1147500 perl-base_5.18.1-1_amd64.deb fe585e832505c184a4d2da2693228824af20c64eec5b96743337fb3d19bd7e0c 4993144 perl-debug_5.18.1-1_amd64.deb 58b74cca41c69b553107d8c68559156557cfdc888882ae7eaede3e452d48098a 1226 libperl5.18_5.18.1-1_amd64.deb 4329d9f1a54a1cc8b1209eadf4c2cf4ca2edc1f54b887451883fd3b27f2296ab 2275560 libperl-dev_5.18.1-1_amd64.deb 9842044e66440e91c8fbab7c31dfe09ce1956d2220fd9f6df60f03deec55e1ef 2649620 perl_5.18.1-1_amd64.deb Files: 8a68d1a3af5f60570a1812216add1b91 1713 perl standard perl_5.18.1-1.dsc 4ec1a3f3824674552e749ae420c5e68c 14059628 perl standard perl_5.18.1.orig.tar.bz2 df9fc8b45b9d5212d8e0bbd9985d7b43 129471 perl standard perl_5.18.1-1.debian.tar.gz 583135b8c08084842c3892d3ef6f8a9f 77068 perl optional libcgi-fast-perl_5.18.1-1_all.deb cf8d87d9e05d506cd1e5ffc99c705aa5 7308310 doc optional perl-doc_5.18.1-1_all.deb 8db131b24762c55a2101c2ebd228e013 2741058 perl standard perl-modules_5.18.1-1_all.deb f8d7a00ed8416727cd71366d1dd4011e 1147500 perl required perl-base_5.18.1-1_amd64.deb e0915ebd7be5afbc1901ebcc1569a2f1 4993144 debug extra perl-debug_5.18.1-1_amd64.deb 33c6a7cf9fbb9e9996f5ca16049a256b 1226 libs optional libperl5.18_5.18.1-1_amd64.deb 64b181ac6625d3bea77dcba282d9c522 2275560 libdevel optional libperl-dev_5.18.1-1_amd64.deb 8116aba002fb840f7fa376e4a3e35d12 2649620 perl standard perl_5.18.1-1_amd64.deb -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.14 (GNU/Linux) iEYEARECAAYFAlIJHRwACgkQiyizGWoHLTlYJgCgxZHo7TgmH9oJV+ZaYu/n0E4Y mLgAoIo5r4S1jUR1FdRymEj/BuJCxfKX =4QMB -----END PGP SIGNATURE-----
--- End Message ---
