[Pdx-pm] Read only?

Kris Bosland krisb at ring.org
Sun Sep 17 13:48:39 PDT 2006


this works:

	my @columns = @{$softtable->[3]};
	is(join(' ',map { $_->{val} } @columns),"100","set1 first bin");

So, it doesn't like my dereference notation for some reason.

Thanks.

-Kris

On Sun, 17 Sep 2006, Kris Bosland wrote:

>
> I am trying to add some tests, and this test (on line 1171):
>
> 	is(join(' ',map { $_->{val} } @{$softtable->[3]}),"100","set1 first bin");
>
> gives me this error:
>
> 	Modification of a read-only value attempted at (eval 23) line
> 	1171, <DATA> line 1965.
>
> However, when I break things down like this:
>
> 	my @columns = @{$softtable->[3]};
> 	my @bins = map { $_->{val} } @columns;
> 	my $binstring = join(' ', at bins);
> 	is($binstring,"100","set1 bins");
>
> the test passes.
>
> Any ideas?
>
> Thanks.
>
> -Kris
>
>
>
> _______________________________________________
> Pdx-pm-list mailing list
> Pdx-pm-list at pm.org
> http://mail.pm.org/mailman/listinfo/pdx-pm-list
>
>
> !DSPAM:450db3ea172876278817596!
>
>



More information about the Pdx-pm-list mailing list