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
Merge pull request #5017 from solgenomics/topic/subplot_seedlots
[sgn.git]
/
cgi-bin
/
solpeople
/
image_404_test.pl
blob
e6dc59519ffae4e532034c1b6b7c465dcdc6a897
1
#!/usr/bin/perl -w
2
use
strict
;
3
use
CXGN
::
Page
;
4
my
$page
=
CXGN
::
Page
->
new
(
"image_404_test.pl"
,
"john binns"
);
5
$page
->
header
();
6
print
"<img src=
\"
image_that_doesnt_exist.png
\"
alt=
\"\"
/>"
;
7
$page
->
footer
();