}
}
-my $wordlist = "$wordlistbase.inc.pl";
my $limit = $get{v} // (exists $get{v} ? 5 : 3);
Html({
keywords => [qw'
language
'],
- data => [$wordlist],
- raw => (exists $get{q} && <<'EOT')
+ data => ["$wordlistbase.inc.pl"],
+ raw => exists $get{q} ? <<'EOT' : undef,
<style>
.gallery figure {
grid-row: span 1 !important;
font-size: 175% !important;
}
</style>
-EOT
- . <<'EOT',
-<style>
-body {
- margin: 8px 1px;
-}
-</style>
EOT
});
</p>
<:
-my $table = do $wordlist or die $@ // $!;
+my $table = Data($wordlistbase);
sub showimg {
my ($id, $name) = @_;