print $where "what";
#           ^
#           |
#     No comma here!