File with Verification code without variable names

Sometimes the file with verification code in dir ...foswiki/working/registration_approvals/ is generated wrong:

diff -w AaaaaBbbbbb.37174941 AaaaaBbbbbb.3795021

2c2
< {
---
> $data = {
4c4
<   'VerificationCode' => 'AaaaaBbbbbb.37174941',
---
>           'VerificationCode' => 'AaaaaBbbbbb.3795021',
14,15c14,15
< }
< [
---
>         };
> $form = [
46c46
< ]
---
>         ];

Environment:

perl5 (revision 5 version 10 subversion 0)
Data::Dumper rel. 2.136
Apache/2.2.12 - apache2-mpm-worker
libapache2-mod-perl2 rel. 2.0.4-5ubuntu1
Ubuntu karmic
Kernel Linux version 2.6.31-23

-- GuidoBrugnara - 09 Nov 2012

This is possibly a bug in Perl CPAN:Data::Dumper, or in Perl itself. Though, your version of Data::Dumper is not all that old. 2.145 is the latest release, and your release is from October 2012.

The Foswiki code in this area dates from very early in the Foswiki release, before the code became Foswiki, and there have not been any changes in this area in the current codebase (1.1.8).

You might also see if you can modify the Apache configuration to run the register script as a plain cgi script instead of mod_perl. That might point toward some sort of global variable or reusable code issue.

If you have a way of reliably recreating this, please open a Task.

-- GeorgeClark - 07 Apr 2013

To resolve without upgrade libs I have change the file Foswiki/UI/Register.pm :

# diff /var/lib/foswiki/lib/Foswiki/UI/Register.pm /var/lib/foswiki/lib/Foswiki/UI/Register.pm.ORIG
467,468c467
<     print $F Data::Dumper->Dump( [ $data ], [ 'data' ] );
<     print $F Data::Dumper->Dump( [ $form ], [ 'form' ] );     
---
>     print $F Data::Dumper->Dump( [ $data, $form ], [ 'data', 'form' ] );