#!/usr/bin/perl -w use CGI; $form = CGI->new(); $web = $form->param('web'); $gui = $form->param('gui'); $oop = $form->param('oop'); $mod = $form->param('mod'); $proj = $form->param('projectname'); # Print form header. print $form->header(); print $form->start_html(title=>'This is the title', -BGCOLOR=>'white'); print "

web.
\n"; } if ($gui eq "yes") { print "
GUI
\n"; } if ($oop eq "yes") { print "
oop
\n"; } if ($mod eq "yes") { print "
mod
\n"; } print "

\n"; print "Estimated completion time for $proj: 5 March, 2025."; print "

\n"; # Paragraph # End HTML form. print $form->end_html();