in reply to perl cgi text area split

my @lines = split /\r?\n/, $text;