my @strings = qw(boy bird FALSE);
@strings = map { unless (/FALSE/) { "\"$_\"" }} @strings;