Select Code to Download

$template->param( STYLE_SHEET       => "$STYLE_SHEET",
                  SCRIPT_LOCATION   => "$SCRIPT_LOCATION",
                  MEMBER_NAME       => $q->param('realname')
                 );

$template->param( MEMBER_NAME       => $q->param('realname')
                 );

if (@row) {
    $q-param( mid        => $row[0],
...
              email      => $row[3]
             );
}

} else {
    $q-param( mid        => 0,
...
              email      => 0
             );
}