sub loadPersonalData { open (FILE, "<$dir/personal_data.html") or die "cannot open file $dir/personal_data.html"; local our $selectionIndex = $articleClass->loadArticleSelection();; local our $selection = $articleClass->viewArticleSelectionByIndex();; local our $menu = $lp->loadMenu(); local our $content; $session = new CGI::Session("driver:File", $session_id, {Directory=>"$session_dir"}); local our $username = $session->param('username'); print "Content-Type: text/html\n\n"; print "session id $session_id
"; print "username $username
"; print "session dir $session_dir
";