$ perl -wle'print scalar <{a,b,c}> for 1..6'
a
b
c
Use of uninitialized value in print at -e line 1.

a
b