[Bio] / FigWebServices / SearchSkeleton.cgi Repository:
ViewVC logotype

Annotation of /FigWebServices/SearchSkeleton.cgi

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.31 - (view) (download)

1 : parrello 1.1 #!/usr/bin/perl -w
2 :    
3 : parrello 1.10 use strict;
4 :     use Tracer;
5 :     use CGI;
6 : parrello 1.31
7 : parrello 1.10
8 : parrello 1.1 =head1 NMPDR Search Skeleton
9 :    
10 : parrello 1.31 This is the original NMPDR Search script. It used to be the home of the
11 :     search code, but that is now found in [[SearchSkeletonPm]]. This script
12 :     simply reroutes the request to the REST handler in the NMPDR Plugin.
13 : parrello 1.19
14 :     =cut
15 :    
16 : parrello 1.31 my $cgi = CGI->new();
17 :     my $parms = $cgi->query_string();
18 :     if ($parms) {
19 :     $parms = "?$parms";
20 :     } else {
21 :     $parms = "";
22 : parrello 1.19 }
23 : parrello 1.31 print CGI::redirect("$FIG_Config::cgi_url/wiki/rest.cgi/NmpdrPlugin/search$parms");
24 : parrello 1.19
25 : parrello 1.28 1;

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3