Select Code to Download

my $userInfo;
my $number = 1;
...
    roll => $temp, 
    sizzle => $temp} ;
print Dumper($userInfo);

$VAR1 = [ { '' => '', '1' => undef, 'rollSizzle' => 'roll', 'id' => 't
+est', 'name' => 'test', 'number' => 1 } ];