use Data::Dumper;

my @v = split(/\r?\n/, param('textbox'));
print Dumper \@v;