Select Code to Download

### This is nice and compact, but what happens if you
### add new variables? You have to remember to keep count.
...

### A more parsimonious example
my $a = my $b = my $c = 'TRUE';

my  $User  = {};
$User->{never_used_site_before} = '1';
...
$User->{lname}      =   '';
$User->{password}   =   '';
$User->{age}        =   '0';