my ($name, $email, $text) = split /,/, $_, 3;