#!perl -w use strict; use CGI qw(:all); my $FORM = param->Vars; my $textarea = $FORM{"text_area_field_name"}; my @numbers = split /\s+/, $textarea.