/[Semantic-Engine]/EPrints/search.cgi
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /EPrints/search.cgi

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 3 by dpavlin, Fri Jun 29 09:21:11 2007 UTC revision 4 by dpavlin, Fri Jun 29 09:52:53 2007 UTC
# Line 36  my $similar = $cgi->param( 'similar' ) | Line 36  my $similar = $cgi->param( 'similar' ) |
36    
37  my $charset='iso-8859-2';  my $charset='iso-8859-2';
38    
39    my $full_query = "$query " . join(" ", EPrints::slogovi( $query ));
40    
41  ##############################  ##############################
42  #       Start the HTML output  #       Start the HTML output
# Line 70  if( $query || $similar ) { Line 71  if( $query || $similar ) {
71    
72      my ($results, $terms);      my ($results, $terms);
73          if ( $query ) {          if ( $query ) {
74          ($results, $terms) = $semantic->semantic_search( $query );          ($results, $terms) = $semantic->semantic_search( $full_query );
75          } else {          } else {
76          ($results, $terms) = $semantic->find_similar( $similar );          ($results, $terms) = $semantic->find_similar( $similar );
77          }          }
# Line 84  warn "terms = ",dump( $terms ); Line 85  warn "terms = ",dump( $terms );
85          my @sorted_terms = sort { $terms->{$b} <=> $terms->{$a} } keys %$terms;          my @sorted_terms = sort { $terms->{$b} <=> $terms->{$a} } keys %$terms;
86          my @top_terms = splice( @sorted_terms, $start, $TERMS_TO_DISPLAY );          my @top_terms = splice( @sorted_terms, $start, $TERMS_TO_DISPLAY );
87                    
88            print "<p>Full query: $full_query</p>\n";
89          print "<p>Related Terms: ". ( join ", ", @top_terms ) ."</p>\n";          print "<p>Related Terms: ". ( join ", ", @top_terms ) ."</p>\n";
90          print "<hr />\n";          print "<hr />\n";
91    
Legend:
Removed from v.3  
changed lines
  Added in v.4
  ViewVC Help
Powered by ViewVC 1.1.26