or download this
print ("adf","ff","f"); # Gladly prints the list
print ("adf","ff","f")[1]; #Gives a syntax error
$val=("adf","ff","f")[1];print $val; #Works easily
print join "",("adf","ff","f"); #Works
print join "",("adf","ff","f")[1]; #Works since treated in list contex
+t