$ perl -we"@f=( qw/ r p n /);print scalar( q/a/, q/b/, q/c/ ,@f) "
Useless use of a constant ("a") in void context at -e line 1.
Useless use of a constant ("b") in void context at -e line 1.
Useless use of a constant ("c") in void context at -e line 1.
3