Saving references in a multi-part form for later use #2

[Cox, T. (NCI) <tc...@ma...>]

Hello all,

I am still banging my head against the wall since my last post concerning
this message. I am trying to save an entry object in between forms and am
having a metal meltdown trying to figure out how to do it. The snippet of
code is:

$input_name = param('Login Name');
$r = LDAPsearch("cn=$input_name","o=matrix");		
		
if(!param('Login Name')){
	print "Login Name field was left blank. Please go back and enter a
login name to search on.<br>";
	print submit(-name=>'go',-value=>'Start Page') if $current_page > 0;
	$flag = 1;
}elsif($r->entries){
	print "Current page: $page_name<br>";
	print "<br>User(s) matching search request:<br>";
						
	@array = $r->entries;
	foreach my $entry (@array)
	{
		$user = $entry->dn;
		push(@userList,$user);
	}
	print popup_menu(-name=> 'Login Name',-size=>1, -VALUES => [
@userList ] );
	$flag=1;
	print "<p>Please select a user to continue.<br>",
		hidden(-name=>'page',-value=>$current_page,-override=>1),
		submit(-name=>'go',-value=>'Previous Page'),
        		submit(-name=>'go',-value=>'Get Attributes');
}else{
	print p("Attribute Information for: "), param('Login Name');
	# this is where I want to display the data for the user selected in
the popup_menu.
	 							

}

Any thoughts would be appreciated.

Todd Cox
National Cancer Institute
Rockville, MD