if ( not defined $session->param( $tokenname ) { # Parameter der Session abgelaufen?
   my $tok = CreateNewToken();                   # Neues Token erstellen
   $session->param( $tokenname, $tok );          # Token in Session speichern
   $session->expire( "10m" );                    # Token nach 10 Minuten ablaufen lassen
   $session->flush();                            # Session speichern
}