use Modern::Perl;

sub givelist {
    my @rtn = ('a', 'b', 'c');
    return @rtn;
}

#say givelist()[1];
my @list = givelist();
say $list[1];

##</code><code>##

X:\Data\Perl>perl ListTest.pl
syntax error at ListTest.pl line 8, near ")["
Execution of ListTest.pl aborted due to compilation errors.

##</code><code>##

X:\Data\Perl>perl ListTest.pl
splice on reference is experimental at ListTest.pl line 8.
Not an ARRAY reference at ListTest.pl line 8.