if (param('Install')) { $SourcePassword = param('SourcePassword'); $SourceServer = param('SourceServer'); $DestPassword = param('DestPassword'); $DestServer = param('DestServer'); $RootPath = param('RootPath'); @InstallOptions = param('InstallOptions'); @Permissions = param('Permissions'); print p("Output Log:"); #print $q->textarea( -name=>'OutputLog', -rows=>10, -cols=>80); print $q->textfield( -name=>'OutputLog',-override => true, -value => 'test' ); param('OutputLog','New Value');