How to store an array in session in Perl

Question

I am using Mojolicious Perl framework in my application. I want to store an array in session, but is not successful.

my @returnResult;
$returnResult['fn'] = $decoded->{'fn'};
$returnResult['ln'] = $decoded->{'ln'};
$self->session(returnResult => @returnResult);

Please help.

do you `use strict; use warnings;` ? don't you get the message `argument 'fn' isn't numeric in array element` ? — Flying_whale, Feb 22 '18 at 12:42
Yes. I am using strict and warnings. I am getting message argument 'fn' isn't numeric in array element — Akhilesh, Feb 22 '18 at 12:55
so, why don't you use numeric arguments instead of "fn" and "ln"? — Flying_whale, Feb 22 '18 at 13:07
As it is more readable. How can I use associative arrays in Perl? — Akhilesh, Feb 22 '18 at 13:14

score 1 · Accepted Answer · answered Feb 22 '18 at 16:33

my %return_result;
$returnResult{fn} = $decoded->{fn};
$returnResult{ln} = $decoded->{ln};

or

my %return_result = (
    fn => $decoded->{fn},
    ln => $decoded->{ln},
);

or simply

# http://perldoc.perl.org/perl5200delta.html#New-slice-syntax
my %return_result = %$decoded{qw(fn ln)};

You do not get automatic references like in other languages. Use the \ operator.

$self->session(returnResult => \%return_result);

Welcome back! Haven't seen you in a while. :-) – simbabque Feb 23 '18 at 06:30 — simbabque, Feb 23 '18 at 06:30

1 Answers1