print scalar (1,2,3);;
Useless use of a constant in void context at (eval 18) line 1, <STDIN> line 16.
3

##</code><code>##

sub f { return( 'a', 'b', reverse(1..3) ); }
my @list = f();
my $scalar = f();