use CGI; use DBI; my $q = new CGI; if ( $q->param('submit') ) { my ( $good_data, $errors ) = validate( $q ); if ( $errors ) { show_form( $errors ); } else { update_db( $good_data ); my $pass = get_password(); show_success( $pass ); } } else { # default to show the form show_form(); } exit 0;