repo.or.cz
/
sgn.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
initial commit of Dataset object.
[sgn.git]
/
cgi-bin
/
chado
/
organism.pl
blob
c6f2ce7e1e76e7debaef0d9190b26a823f8ebd42
1
use
CGI
();
2
my
$q
=
CGI
->
new
;
3
my
$oid
=
$q
->
param
(
'organism_id'
) +
0
;
4
print
$q
->
redirect
(
5
-
uri
=>
'/organism/'
.(
$q
->
param
(
'organism_id'
) +
0
).
'/view'
,
6
-
status
=>
301
,
7
);
8