152 |
. qq|<ul><li>| |
. qq|<ul><li>| |
153 |
. join("</li>\n<li>", |
. join("</li>\n<li>", |
154 |
map { |
map { |
155 |
qq|<a href="?test=$_"><tt>$_</tt></a> ← | |
my $test = $_; |
156 |
. |
my $depends = |
157 |
join(' ', |
join(' ', |
158 |
map { |
map { |
159 |
if ( m{\s} ) { |
if ( m{\s} ) { |
163 |
# qq|<a target="editor" href="/editor+$_+1" title="edit">$_</a>| |
# qq|<a target="editor" href="/editor+$_+1" title="edit">$_</a>| |
164 |
} |
} |
165 |
} keys %{ $depends->{$_} } |
} keys %{ $depends->{$_} } |
166 |
) |
); |
167 |
|
qq|<a href="?test=$test"><tt>$test</tt></a>| |
168 |
|
. ( $depends ? qq| ← $depends| : '' ) |
169 |
|
; |
170 |
} @tests ) |
} @tests ) |
171 |
. qq|</li></ul>| |
. qq|</li></ul>| |
172 |
; |
; |