Select Code to Download

[% USE CGI %]
[% CGI.header %]
...
[% CGI.textbox( { name=>"text" } ) %]
[% CGI.submit %]
[% CGI.end_form %]

#!/usr/bin/perl
use CGI;
...
      $q->textbox( -name=>"text" ),
      $q->submit,
      $q->end_form;