Vigenerizer

Das Vigenère-Quadrat für den ASCII-Modus

Bitte warten, das Quadrat wird aufgebaut ... mal sehen, ob dein Browser eine Tabelle mit 9025 Zellen noch sauber darstellt. Das Zeichen links oben ist der Leerschritt.

Und, weil mal jemand gefragt hat: Nein, das habe ich nicht alles einzeln eingetippt. Die Tabelle wird bei jedem Seitenaufruf von diesem kleinen Perlskript neu zusammengebastelt (wobei die Hälfte des Codes nur kosmetischen Zwecken dient, für einen schöneren Quelltext):

print "<table>\n";
my $zeichen;
for ( my $i = 0 ; $i <= 94 ; $i++ )
{
  print "  <tr><!-- Zeile $i -->\n    ";
  for ( my $j = $i ; $j <= 94+$i ; $j++ )
  {
    $zeichen = chr( $j%95+32 );
    $zeichen = "&lt;" if ( $zeichen eq "<" );  # "<" durch Entität ersetzen
    print "<td>$zeichen</td>";
    print "\n    " if ( ($j-$i)%10 == 9 );  # neue Zeile nach 10 Zellen
  }
  print "\n  </tr>\n";
}
print "</table>\n";
!"#$%&'() *+,-./0123 456789:;<= >?@ABCDEFG HIJKLMNOPQ RSTUVWXYZ[ \]^_`abcde fghijklmno pqrstuvwxy z{|}~
!"#$%&'()* +,-./01234 56789:;<=> ?@ABCDEFGH IJKLMNOPQR STUVWXYZ[\ ]^_`abcdef ghijklmnop qrstuvwxyz {|}~
"#$%&'()*+ ,-./012345 6789:;<=>? @ABCDEFGHI JKLMNOPQRS TUVWXYZ[\] ^_`abcdefg hijklmnopq rstuvwxyz{ |}~ !
#$%&'()*+, -./0123456 789:;<=>?@ ABCDEFGHIJ KLMNOPQRST UVWXYZ[\]^ _`abcdefgh ijklmnopqr stuvwxyz{| }~ !"
$%&'()*+,- ./01234567 89:;<=>?@A BCDEFGHIJK LMNOPQRSTU VWXYZ[\]^_ `abcdefghi jklmnopqrs tuvwxyz{|} ~ !"#
%&'()*+,-. /012345678 9:;<=>?@AB CDEFGHIJKL MNOPQRSTUV WXYZ[\]^_` abcdefghij klmnopqrst uvwxyz{|}~ !"#$
&'()*+,-./ 0123456789 :;<=>?@ABC DEFGHIJKLM NOPQRSTUVW XYZ[\]^_`a bcdefghijk lmnopqrstu vwxyz{|}~ !"#$%
'()*+,-./0 123456789: ;<=>?@ABCD EFGHIJKLMN OPQRSTUVWX YZ[\]^_`ab cdefghijkl mnopqrstuv wxyz{|}~ ! "#$%&
()*+,-./01 23456789:; <=>?@ABCDE FGHIJKLMNO PQRSTUVWXY Z[\]^_`abc defghijklm nopqrstuvw xyz{|}~ !" #$%&'
)*+,-./012 3456789:;< =>?@ABCDEF GHIJKLMNOP QRSTUVWXYZ [\]^_`abcd efghijklmn opqrstuvwx yz{|}~ !"# $%&'(
*+,-./0123 456789:;<= >?@ABCDEFG HIJKLMNOPQ RSTUVWXYZ[ \]^_`abcde fghijklmno pqrstuvwxy z{|}~ !"#$ %&'()
+,-./01234 56789:;<=> ?@ABCDEFGH IJKLMNOPQR STUVWXYZ[\ ]^_`abcdef ghijklmnop qrstuvwxyz {|}~ !"#$% &'()*
,-./012345 6789:;<=>? @ABCDEFGHI JKLMNOPQRS TUVWXYZ[\] ^_`abcdefg hijklmnopq rstuvwxyz{ |}~ !"#$%& '()*+
-./0123456 789:;<=>?@ ABCDEFGHIJ KLMNOPQRST UVWXYZ[\]^ _`abcdefgh ijklmnopqr stuvwxyz{| }~ !"#$%&' ()*+,
./01234567 89:;<=>?@A BCDEFGHIJK LMNOPQRSTU VWXYZ[\]^_ `abcdefghi jklmnopqrs tuvwxyz{|} ~ !"#$%&'( )*+,-
/012345678 9:;<=>?@AB CDEFGHIJKL MNOPQRSTUV WXYZ[\]^_` abcdefghij klmnopqrst uvwxyz{|}~ !"#$%&'() *+,-.
0123456789 :;<=>?@ABC DEFGHIJKLM NOPQRSTUVW XYZ[\]^_`a bcdefghijk lmnopqrstu vwxyz{|}~ !"#$%&'()* +,-./
123456789: ;<=>?@ABCD EFGHIJKLMN OPQRSTUVWX YZ[\]^_`ab cdefghijkl mnopqrstuv wxyz{|}~ ! "#$%&'()*+ ,-./0
23456789:; <=>?@ABCDE FGHIJKLMNO PQRSTUVWXY Z[\]^_`abc defghijklm nopqrstuvw xyz{|}~ !" #$%&'()*+, -./01
3456789:;< =>?@ABCDEF GHIJKLMNOP QRSTUVWXYZ [\]^_`abcd efghijklmn opqrstuvwx yz{|}~ !"# $%&'()*+,- ./012
456789:;<= >?@ABCDEFG HIJKLMNOPQ RSTUVWXYZ[ \]^_`abcde fghijklmno pqrstuvwxy z{|}~ !"#$ %&'()*+,-. /0123
56789:;<=> ?@ABCDEFGH IJKLMNOPQR STUVWXYZ[\ ]^_`abcdef ghijklmnop qrstuvwxyz {|}~ !"#$% &'()*+,-./ 01234
6789:;<=>? @ABCDEFGHI JKLMNOPQRS TUVWXYZ[\] ^_`abcdefg hijklmnopq rstuvwxyz{ |}~ !"#$%& '()*+,-./0 12345
789:;<=>?@ ABCDEFGHIJ KLMNOPQRST UVWXYZ[\]^ _`abcdefgh ijklmnopqr stuvwxyz{| }~ !"#$%&' ()*+,-./01 23456
89:;<=>?@A BCDEFGHIJK LMNOPQRSTU VWXYZ[\]^_ `abcdefghi jklmnopqrs tuvwxyz{|} ~ !"#$%&'( )*+,-./012 34567
9:;<=>?@AB CDEFGHIJKL MNOPQRSTUV WXYZ[\]^_` abcdefghij klmnopqrst uvwxyz{|}~ !"#$%&'() *+,-./0123 45678
:;<=>?@ABC DEFGHIJKLM NOPQRSTUVW XYZ[\]^_`a bcdefghijk lmnopqrstu vwxyz{|}~ !"#$%&'()* +,-./01234 56789
;<=>?@ABCD EFGHIJKLMN OPQRSTUVWX YZ[\]^_`ab cdefghijkl mnopqrstuv wxyz{|}~ ! "#$%&'()*+ ,-./012345 6789:
<=>?@ABCDE FGHIJKLMNO PQRSTUVWXY Z[\]^_`abc defghijklm nopqrstuvw xyz{|}~ !" #$%&'()*+, -./0123456 789:;
=>?@ABCDEF GHIJKLMNOP QRSTUVWXYZ [\]^_`abcd efghijklmn opqrstuvwx yz{|}~ !"# $%&'()*+,- ./01234567 89:;<
>?@ABCDEFG HIJKLMNOPQ RSTUVWXYZ[ \]^_`abcde fghijklmno pqrstuvwxy z{|}~ !"#$ %&'()*+,-. /012345678 9:;<=
?@ABCDEFGH IJKLMNOPQR STUVWXYZ[\ ]^_`abcdef ghijklmnop qrstuvwxyz {|}~ !"#$% &'()*+,-./ 0123456789 :;<=>
@ABCDEFGHI JKLMNOPQRS TUVWXYZ[\] ^_`abcdefg hijklmnopq rstuvwxyz{ |}~ !"#$%& '()*+,-./0 123456789: ;<=>?
ABCDEFGHIJ KLMNOPQRST UVWXYZ[\]^ _`abcdefgh ijklmnopqr stuvwxyz{| }~ !"#$%&' ()*+,-./01 23456789:; <=>?@
BCDEFGHIJK LMNOPQRSTU VWXYZ[\]^_ `abcdefghi jklmnopqrs tuvwxyz{|} ~ !"#$%&'( )*+,-./012 3456789:;< =>?@A
CDEFGHIJKL MNOPQRSTUV WXYZ[\]^_` abcdefghij klmnopqrst uvwxyz{|}~ !"#$%&'() *+,-./0123 456789:;<= >?@AB
DEFGHIJKLM NOPQRSTUVW XYZ[\]^_`a bcdefghijk lmnopqrstu vwxyz{|}~ !"#$%&'()* +,-./01234 56789:;<=> ?@ABC
EFGHIJKLMN OPQRSTUVWX YZ[\]^_`ab cdefghijkl mnopqrstuv wxyz{|}~ ! "#$%&'()*+ ,-./012345 6789:;<=>? @ABCD
FGHIJKLMNO PQRSTUVWXY Z[\]^_`abc defghijklm nopqrstuvw xyz{|}~ !" #$%&'()*+, -./0123456 789:;<=>?@ ABCDE
GHIJKLMNOP QRSTUVWXYZ [\]^_`abcd efghijklmn opqrstuvwx yz{|}~ !"# $%&'()*+,- ./01234567 89:;<=>?@A BCDEF
HIJKLMNOPQ RSTUVWXYZ[ \]^_`abcde fghijklmno pqrstuvwxy z{|}~ !"#$ %&'()*+,-. /012345678 9:;<=>?@AB CDEFG
IJKLMNOPQR STUVWXYZ[\ ]^_`abcdef ghijklmnop qrstuvwxyz {|}~ !"#$% &'()*+,-./ 0123456789 :;<=>?@ABC DEFGH
JKLMNOPQRS TUVWXYZ[\] ^_`abcdefg hijklmnopq rstuvwxyz{ |}~ !"#$%& '()*+,-./0 123456789: ;<=>?@ABCD EFGHI
KLMNOPQRST UVWXYZ[\]^ _`abcdefgh ijklmnopqr stuvwxyz{| }~ !"#$%&' ()*+,-./01 23456789:; <=>?@ABCDE FGHIJ
LMNOPQRSTU VWXYZ[\]^_ `abcdefghi jklmnopqrs tuvwxyz{|} ~ !"#$%&'( )*+,-./012 3456789:;< =>?@ABCDEF GHIJK
MNOPQRSTUV WXYZ[\]^_` abcdefghij klmnopqrst uvwxyz{|}~ !"#$%&'() *+,-./0123 456789:;<= >?@ABCDEFG HIJKL
NOPQRSTUVW XYZ[\]^_`a bcdefghijk lmnopqrstu vwxyz{|}~ !"#$%&'()* +,-./01234 56789:;<=> ?@ABCDEFGH IJKLM
OPQRSTUVWX YZ[\]^_`ab cdefghijkl mnopqrstuv wxyz{|}~ ! "#$%&'()*+ ,-./012345 6789:;<=>? @ABCDEFGHI JKLMN
PQRSTUVWXY Z[\]^_`abc defghijklm nopqrstuvw xyz{|}~ !" #$%&'()*+, -./0123456 789:;<=>?@ ABCDEFGHIJ KLMNO
QRSTUVWXYZ [\]^_`abcd efghijklmn opqrstuvwx yz{|}~ !"# $%&'()*+,- ./01234567 89:;<=>?@A BCDEFGHIJK LMNOP
RSTUVWXYZ[ \]^_`abcde fghijklmno pqrstuvwxy z{|}~ !"#$ %&'()*+,-. /012345678 9:;<=>?@AB CDEFGHIJKL MNOPQ
STUVWXYZ[\ ]^_`abcdef ghijklmnop qrstuvwxyz {|}~ !"#$% &'()*+,-./ 0123456789 :;<=>?@ABC DEFGHIJKLM NOPQR
TUVWXYZ[\] ^_`abcdefg hijklmnopq rstuvwxyz{ |}~ !"#$%& '()*+,-./0 123456789: ;<=>?@ABCD EFGHIJKLMN OPQRS
UVWXYZ[\]^ _`abcdefgh ijklmnopqr stuvwxyz{| }~ !"#$%&' ()*+,-./01 23456789:; <=>?@ABCDE FGHIJKLMNO PQRST
VWXYZ[\]^_ `abcdefghi jklmnopqrs tuvwxyz{|} ~ !"#$%&'( )*+,-./012 3456789:;< =>?@ABCDEF GHIJKLMNOP QRSTU
WXYZ[\]^_` abcdefghij klmnopqrst uvwxyz{|}~ !"#$%&'() *+,-./0123 456789:;<= >?@ABCDEFG HIJKLMNOPQ RSTUV
XYZ[\]^_`a bcdefghijk lmnopqrstu vwxyz{|}~ !"#$%&'()* +,-./01234 56789:;<=> ?@ABCDEFGH IJKLMNOPQR STUVW
YZ[\]^_`ab cdefghijkl mnopqrstuv wxyz{|}~ ! "#$%&'()*+ ,-./012345 6789:;<=>? @ABCDEFGHI JKLMNOPQRS TUVWX
Z[\]^_`abc defghijklm nopqrstuvw xyz{|}~ !" #$%&'()*+, -./0123456 789:;<=>?@ ABCDEFGHIJ KLMNOPQRST UVWXY
[\]^_`abcd efghijklmn opqrstuvwx yz{|}~ !"# $%&'()*+,- ./01234567 89:;<=>?@A BCDEFGHIJK LMNOPQRSTU VWXYZ
\]^_`abcde fghijklmno pqrstuvwxy z{|}~ !"#$ %&'()*+,-. /012345678 9:;<=>?@AB CDEFGHIJKL MNOPQRSTUV WXYZ[
]^_`abcdef ghijklmnop qrstuvwxyz {|}~ !"#$% &'()*+,-./ 0123456789 :;<=>?@ABC DEFGHIJKLM NOPQRSTUVW XYZ[\
^_`abcdefg hijklmnopq rstuvwxyz{ |}~ !"#$%& '()*+,-./0 123456789: ;<=>?@ABCD EFGHIJKLMN OPQRSTUVWX YZ[\]
_`abcdefgh ijklmnopqr stuvwxyz{| }~ !"#$%&' ()*+,-./01 23456789:; <=>?@ABCDE FGHIJKLMNO PQRSTUVWXY Z[\]^
`abcdefghi jklmnopqrs tuvwxyz{|} ~ !"#$%&'( )*+,-./012 3456789:;< =>?@ABCDEF GHIJKLMNOP QRSTUVWXYZ [\]^_
abcdefghij klmnopqrst uvwxyz{|}~ !"#$%&'() *+,-./0123 456789:;<= >?@ABCDEFG HIJKLMNOPQ RSTUVWXYZ[ \]^_`
bcdefghijk lmnopqrstu vwxyz{|}~ !"#$%&'()* +,-./01234 56789:;<=> ?@ABCDEFGH IJKLMNOPQR STUVWXYZ[\ ]^_`a
cdefghijkl mnopqrstuv wxyz{|}~ ! "#$%&'()*+ ,-./012345 6789:;<=>? @ABCDEFGHI JKLMNOPQRS TUVWXYZ[\] ^_`ab
defghijklm nopqrstuvw xyz{|}~ !" #$%&'()*+, -./0123456 789:;<=>?@ ABCDEFGHIJ KLMNOPQRST UVWXYZ[\]^ _`abc
efghijklmn opqrstuvwx yz{|}~ !"# $%&'()*+,- ./01234567 89:;<=>?@A BCDEFGHIJK LMNOPQRSTU VWXYZ[\]^_ `abcd
fghijklmno pqrstuvwxy z{|}~ !"#$ %&'()*+,-. /012345678 9:;<=>?@AB CDEFGHIJKL MNOPQRSTUV WXYZ[\]^_` abcde
ghijklmnop qrstuvwxyz {|}~ !"#$% &'()*+,-./ 0123456789 :;<=>?@ABC DEFGHIJKLM NOPQRSTUVW XYZ[\]^_`a bcdef
hijklmnopq rstuvwxyz{ |}~ !"#$%& '()*+,-./0 123456789: ;<=>?@ABCD EFGHIJKLMN OPQRSTUVWX YZ[\]^_`ab cdefg
ijklmnopqr stuvwxyz{| }~ !"#$%&' ()*+,-./01 23456789:; <=>?@ABCDE FGHIJKLMNO PQRSTUVWXY Z[\]^_`abc defgh
jklmnopqrs tuvwxyz{|} ~ !"#$%&'( )*+,-./012 3456789:;< =>?@ABCDEF GHIJKLMNOP QRSTUVWXYZ [\]^_`abcd efghi
klmnopqrst uvwxyz{|}~ !"#$%&'() *+,-./0123 456789:;<= >?@ABCDEFG HIJKLMNOPQ RSTUVWXYZ[ \]^_`abcde fghij
lmnopqrstu vwxyz{|}~ !"#$%&'()* +,-./01234 56789:;<=> ?@ABCDEFGH IJKLMNOPQR STUVWXYZ[\ ]^_`abcdef ghijk
mnopqrstuv wxyz{|}~ ! "#$%&'()*+ ,-./012345 6789:;<=>? @ABCDEFGHI JKLMNOPQRS TUVWXYZ[\] ^_`abcdefg hijkl
nopqrstuvw xyz{|}~ !" #$%&'()*+, -./0123456 789:;<=>?@ ABCDEFGHIJ KLMNOPQRST UVWXYZ[\]^ _`abcdefgh ijklm
opqrstuvwx yz{|}~ !"# $%&'()*+,- ./01234567 89:;<=>?@A BCDEFGHIJK LMNOPQRSTU VWXYZ[\]^_ `abcdefghi jklmn
pqrstuvwxy z{|}~ !"#$ %&'()*+,-. /012345678 9:;<=>?@AB CDEFGHIJKL MNOPQRSTUV WXYZ[\]^_` abcdefghij klmno
qrstuvwxyz {|}~ !"#$% &'()*+,-./ 0123456789 :;<=>?@ABC DEFGHIJKLM NOPQRSTUVW XYZ[\]^_`a bcdefghijk lmnop
rstuvwxyz{ |}~ !"#$%& '()*+,-./0 123456789: ;<=>?@ABCD EFGHIJKLMN OPQRSTUVWX YZ[\]^_`ab cdefghijkl mnopq
stuvwxyz{| }~ !"#$%&' ()*+,-./01 23456789:; <=>?@ABCDE FGHIJKLMNO PQRSTUVWXY Z[\]^_`abc defghijklm nopqr
tuvwxyz{|} ~ !"#$%&'( )*+,-./012 3456789:;< =>?@ABCDEF GHIJKLMNOP QRSTUVWXYZ [\]^_`abcd efghijklmn opqrs
uvwxyz{|}~ !"#$%&'() *+,-./0123 456789:;<= >?@ABCDEFG HIJKLMNOPQ RSTUVWXYZ[ \]^_`abcde fghijklmno pqrst
vwxyz{|}~ !"#$%&'()* +,-./01234 56789:;<=> ?@ABCDEFGH IJKLMNOPQR STUVWXYZ[\ ]^_`abcdef ghijklmnop qrstu
wxyz{|}~ ! "#$%&'()*+ ,-./012345 6789:;<=>? @ABCDEFGHI JKLMNOPQRS TUVWXYZ[\] ^_`abcdefg hijklmnopq rstuv
xyz{|}~ !" #$%&'()*+, -./0123456 789:;<=>?@ ABCDEFGHIJ KLMNOPQRST UVWXYZ[\]^ _`abcdefgh ijklmnopqr stuvw
yz{|}~ !"# $%&'()*+,- ./01234567 89:;<=>?@A BCDEFGHIJK LMNOPQRSTU VWXYZ[\]^_ `abcdefghi jklmnopqrs tuvwx
z{|}~ !"#$ %&'()*+,-. /012345678 9:;<=>?@AB CDEFGHIJKL MNOPQRSTUV WXYZ[\]^_` abcdefghij klmnopqrst uvwxy
{|}~ !"#$% &'()*+,-./ 0123456789 :;<=>?@ABC DEFGHIJKLM NOPQRSTUVW XYZ[\]^_`a bcdefghijk lmnopqrstu vwxyz
|}~ !"#$%& '()*+,-./0 123456789: ;<=>?@ABCD EFGHIJKLMN OPQRSTUVWX YZ[\]^_`ab cdefghijkl mnopqrstuv wxyz{
}~ !"#$%&' ()*+,-./01 23456789:; <=>?@ABCDE FGHIJKLMNO PQRSTUVWXY Z[\]^_`abc defghijklm nopqrstuvw xyz{|
~ !"#$%&'( )*+,-./012 3456789:;< =>?@ABCDEF GHIJKLMNOP QRSTUVWXYZ [\]^_`abcd efghijklmn opqrstuvwx yz{|}