Package: libparams-validate-perl Version: 0.97-1+b1 Severity: important Tags: upstream
As the attached file shows, using the Readonly module to define a validation spec causes Params::Validate's XS code to segfault. -- System Information: Debian Release: wheezy/sid APT prefers unstable APT policy: (500, 'unstable'), (100, 'experimental') Architecture: i386 (i686) Kernel: Linux 3.0.0-2-686-pae (SMP w/2 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 libparams-validate-perl depends on: ii libc6 2.13-21 ii perl 5.12.4-6 ii perl-base [perlapi-5.12.3] 5.12.4-6 libparams-validate-perl recommends no packages. libparams-validate-perl suggests no packages. -- no debconf information -- James GPG Key: 1024D/61326D40 2003-09-02 James Vega <[email protected]>
use strict;
use Readonly;
use Params::Validate qw(validate :types);
Readonly::Hash my %spec => ( foo => { type => SCALAR } );
my @args = (foo => 'bar');
validate(@args, \%spec);
signature.asc
Description: Digital signature

