Help for this page

Select Code to Download

Select or download this

use CGI qw(header param); print header;
foreach (param) { ($$_ = param($_)) =~ s/\r\n|\n/<BR>/g; }

Select or download this
(my $some_variable = param('textbox-name')) =~ s/\r\n|\n/<BR>/g;