$ perl -we 'use constant WD => qw{Sun Mon}; print (WD)[1]'
print (...) interpreted as function at -e line 1.
syntax error at -e line 1, near ")["
Execution of -e aborted due to compilation errors.
$ perl -we 'use constant WD => qw{Sun Mon}; print  (WD)[1]'
syntax error at -e line 1, near ")["
Execution of -e aborted due to compilation errors.