can anybody tell me meaning of following
my $q=CGI->new(); my ($html); my %ARGS;
foreach ($q->param()) { $ARGS{$_}=$q->param($_);}$ARGS{'form'} = "" if(defined($ARGS{'form'}) == 0);
$ARGS{'action'} = "" if(defined($ARGS{'action'}) == 0);
$ARGS{'completeurl'} = $q->self_url();my $modeform = $ARGS{"form"};
my $modeaction = $ARGS{"action"};$ARGS{'error'}="";if($modeform eq "")
{
if ($modeaction eq "Login")
{ $html = RMD::LoginProcess($html, %ARGS);
}_________________________________________________________________
Strike the perfect match on BharatMatrimony.com. http://www.bharatmatrimony.com/cgi-bin/bmclicks1.cgi?74 Join FREE
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
