@data=split(/&/,$ENV{QUERY_STRING}); foreach $geg (@data){ ($naam,$value)=split(/=/,$geg); $form{$naam}=$value; } if($form{page} eq "") { require "home.cgi"; } else { require "$form{page}.cgi" }