$\=$/;
@a = qw( d e f );
print(@a);               # prints 'def'
print(scalar(@a));       # prints '3'
print(@a==3?'3':'!3');   # prints '3'