[Home]GetParam/Code

UseModWiki | GetParam | RecentChanges | Preferences

Code

Version 0.92

sub GetParam {
  my ($name, $default) = @_;
  my $result;
 
  $result = $q->param($name);
  if (!defined($result)) {
    if (defined($UserData{$name})) {
      $result = $UserData{$name};
    } else {
      $result = $default;
    }
  }
  return $result;
 } 


UseModWiki | GetParam | RecentChanges | Preferences
Edit text of this page | View other revisions | Search MetaWiki
Last edited March 29, 2002 12:53 am by deptvasf-cp.va.gov (diff)
Search: