#!perl
use warnings;
use strict;
use CGI qw(:all);
use CGI::Carp qw(fatalsToBrowser);
my $textarea_value = parm($textarea_field_name);
# ...