D:\temp>perl -we "my @names = qw(user_name, house_name, street_address, phone_number, date_of_birth);"
Possible attempt to separate words with commas at -e line 1.