Re^2: Order of execution of functions in list

[ikegami]

has no side-effects

$ perl -E'@a=qw( a b c ); say 0+@a; shift(@a); say 0+@a;'
3
2

returns an rvalue

$ perl -E'$_=123; say; sub { sub { ++$_[0] }->(shift); }->($_); say;'
123
124