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
add cross autocomplete works for vector constructs
[sgn.git]
/
cgi-bin
/
biosource
/
sample.pl
blob
7f08854d7c6785dce27e565327ef542a0237074e
1
use
CGI
();
2
my
$q
=
CGI
->
new
;
3
print
$q
->
redirect
( -
status
=>
302
, -
uri
=>
'/data_source/'
.(
$q
->
param
(
'id'
) ||
$q
->
param
(
'name'
) ).
'/view'
);