Thread Mojolicious: bedingtes "self->render"
(10 answers)
Opened by Kuerbis at 2011-08-10 10:56 Code (perl): (dl
)
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 get '/zwei' => sub { my $self = shift; my $count = $dbh->prepare( "SELECT COUNT(*) FROM $table WHERE nachname == ?" ); $count->execute( $self->param('nachname') ); my $exists = ( $count->fetchrow_array )[0]; if ( not $exists ) { $self->render( 'eingabe' ); # neuen Eintrag zu Datenbank hinzufügen } elsif ( $exists == 1 ) { my $sth = $dbh->prepare( "SELECT * FROM $table WHERE nachname == ?" ); $sth->execute( $self->param('nachname') ); my $hash = $sth->fetchrow_hashref; $self->stash( vorname => $hash->{vorname} ); $self->stash( nachname => $hash->{nachname} ); $self->stash( steuernummer => $hash->{steuernummer} ); $self->stash( strasse => $strasse ); $self->stash( nummer => $nummer ); $self->stash( ort => $ort ); $self->stash( plz => $plz ); $self->render( 'kontrolle' ); # ausgewählten Eintrag ausgeben } else { my $sth = $dbh->prepare( "SELECT vorname, nachname, steuernummer FROM $table WHERE nachname == ?" ); $sth->execute( $self->param('nachname') ); $self->stash( sth => $sth ); $self->render( 'auswahl' ); # aus gefundenen Einträgen auswählen } }; Ist das so in Ordnung, wenn ich je nach Resultat der Datenbankabfrage verschiedene Seiten aufrufen möchte? |