Select Code to Download

use strict;
use CGI qw(:standard);
...
if ($box = param('box')) {
   print 'You submitted' . div({style=>'display: inline; color: red'},
+$box);
}

use strict;
use CGI;
...

</body>
</html>