Schrift
Start · Board · Anwendungen/Programme/Skripte in Perl · Allgemeines zu Perl
[thread]6426[/thread]

RDW #3 - Rätsel der Woche Nr. 3 (Seite 2)

Tags: Ähnliche Threads

Leser: 1


<< |< 1 2 3 4 5 ... 8 >| >> 74 Einträge, 8 Seiten
kabel
 2004-07-23 17:30
#84819 #84819
User since
2003-08-04
704 Artikel
BenutzerIn
[default_avatar]
och meno ... ;-)
-- stefan
Crian
 2004-07-23 17:32
#84820 #84820
User since
2003-08-04
5866 Artikel
ModeratorIn
[Homepage]
user image
;-)


[quote=pq,23.07.2004, 13:00][quote=Crian,23.07.2004, 11:42]Ich hab jetzt hier:

http://wiki.perl-community.de/bin/view/Wissensbasis/RaetseL20040723

das Rätsel ins Wiki gestellt.
[/quote]
wie hast du denn die seite erstellt? manuell oder per formular?
Quote
Bitte sagt mir mal wer, wie ich das auf der Raetsel-Einstiegsseite verlinke,

musst du nicht; geschieht automatisch (wenn du die seite per formular erstellst)
Quote
wie ich dort die Anzahl auf drei setze,

indem du die seite Wissensbasis/RaetselDerWoche editierst und in dem formular
eine drei anstatt 2 einträgst...
Quote
wieso ich beim Bearbeiten von Raetsel 2 unten eine Box habe, wo ich Titel etc einstellen kann, dies bei Raetsel 3 aber nicht der Fall ist etc.

vermutlich, weil du die seite manuell anstatt per formular engelegt hast.
Quote
Braucht man denn erst eine Fortbildung um dieses Wiki genau zu kennen? *grmpf*

sorry, aber du musst halt auch sagen, wie du die seite erstellt hast.
kann ja sein, dass du es mit dem formular gemacht hast, aber es ist was
schiefgelaufen. dann kann ich das formular aber nur reparieren, wenn du beschreibst,
was du gemacht hast.
ansonsten kannst du immer auch gerne eine kurze mail schreiben, 'bitte erstell
doch mal kurz 'RaetseL2004....', und dann wird das gemacht.

ansonsten scheint sich das aber erledigt zu haben, renee hat es wohl geändert.[/quote]
Also: zunächst hab ich die Seite per Formular erzeugt, als sie dann aber irgendwie nicht erstellt war, hab ich sie halt per Hand erzeugt.

Renee hat mir aber auch noch eine Anleitung per pm geschickt, mal schauen, ob ich bei RDW04 damit klarkomme.\n\n

<!--EDIT|Crian|1090589627-->
s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite
esskar
 2004-07-23 17:33
#84821 #84821
User since
2003-08-04
7321 Artikel
ModeratorIn

user image
für folgende Datei http://www.intertivity.com/share/hexdump.png liefert die Funktion hexdump folgenden Hexdump:

http://www.intertivity.com/share/hexdump.txt\n\n

<!--EDIT|esskar|1090589701-->
Crian
 2004-07-23 17:34
#84822 #84822
User since
2003-08-04
5866 Artikel
ModeratorIn
[Homepage]
user image
Ach das meinst Du. War das nicht klar? Was will man mit einem hexdumper, der nur Textdateien dumpen kann?\n\n

<!--EDIT|Crian|1090589743-->
s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite
esskar
 2004-07-23 17:36
#84823 #84823
User since
2003-08-04
7321 Artikel
ModeratorIn

user image
[quote=Crian,23.07.2004, 15:34]Ach das meinst Du. War das nicht klar? Was will man mit einem hexdumper, der nur Textdateien dumpen kann?[/quote]
keine ahnung?
Crian
 2004-07-23 17:40
#84824 #84824
User since
2003-08-04
5866 Artikel
ModeratorIn
[Homepage]
user image
Ich bin mehr für diese Ausgabe:

Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
..\rdw\rdw03>rdw03_crian.pl hexdump.png
0000: 89 50 4e 47 0a 1a 0a 00 - 00 00 0d 49 48 44 52 00    .PNG.......IHDR.
0010: 00 00 96 00 00 00 96 04 - 03 00 00 00 ce 2f 6c d1    ............./l.
0020: 00 00 00 24 50 4c 54 45 - ff ff ff 00 00 00 f4 cb    ...$PLTE........
0030: c5 db 49 34 ea 97 8b ef - b1 a8 f9 e5 e2 e0 63 51    ..I4..........cQ
0040: e5 7d 6e ef ff 29 00 00 - 00 d6 30 18 37 12 29 e6    .}n..)....0.7.).
0050: 00 00 00 01 74 52 4e 53 - 01 37 e1 e8 f0 00 00 00    ....tRNS.7......
0060: e3 49 44 41 54 78 9c ed - d2 b1 4e c3 30 14 46 61    .IDATx....N.0.Fa
0070: 8b d2 b4 92 1f 85 a5 ea - da 85 9d a5 13 4b 16 16    .............K..
0080: 26 16 d4 35 5b 2b 75 c9 - cb 20 d2 62 a4 ff e5 b8    &..5[+u.. .b....
0090: 37 09 0f 00 d7 ea 74 be - c1 f1 74 64 3b 37 a5 9b    7.....t...td;7..
00a0: 59 97 97 6a ad 56 8f d5 - 5a 9d de ab b5 a4 cd f8    Y..j.V..Z.......
00b0: 6d 4e 97 0a ad 8f 31 d5 - 2b 7e d9 b9 d5 4a 0a 1f    mN....1.+~...J..
00c0: 6c 6a dd cb 1d c2 ad 2f - 5b 7b d5 88 ed bc b5 b2    lj...../[{......
00d0: 8c bf 58 f0 c9 3a 7d fa - 72 99 9e ec 1a 6a f5 96    ..X..:}.r....j..
00e0: b1 63 ed 6d db b4 2a a1 - d6 93 86 94 e7 c6 9d 14    .c.m..*.........
00f0: 6a 3d d8 99 b2 df d3 05 - 5b 6f 36 f8 79 9a b1 d4    j=......[o6.y...
0100: d8 19 23 16 f6 e0 79 9c - 0b 9f b2 ef 50 6b 2d 95    ..#...y.....Pk-.
0110: ac e1 d9 b6 af dd dc fc - 2f 9f f8 ac 5f fb 50 cb    ......../..._.P.
0120: fe 5d 59 ee e6 d4 36 94 - b2 01 1b ce 69 79 f2 52    .]Y...6.....iy.R
0130: 39 06 53 00 00 00 00 00 - 00 00 00 00 00 00 00 00    9.S.............
0140: 00 fc c9 0f 15 e9 63 3a - ee 06 80 35 00 00 00 00    ......c:...5....
0150: 49 45 4e 44 ae 42 60 82                              IEND.B`.


Hmmm .... außerdem stimmt da was mit den Bytes nicht, kann das am Download liegen? Die erste Zeile bei Dir:

0000: 89 50 4e 47 0d 0a 1a 0a - 00 00 00 0d 49 48 44 52    ëPNG........IHDR

und bei mir:

0000: 89 50 4e 47 0a 1a 0a 00 - 00 00 0d 49 48 44 52 00    .PNG.......IHDR.

Vielleicht solltest Du sagen, welche Zeichen man ausgeben soll, ich geb nur zwischen 32 und 127 inklusive aus, sonst halt einen Punkt.\n\n

<!--EDIT|Crian|1090590602-->
s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite
betterworld
 2004-07-23 17:51
#84825 #84825
User since
2003-08-21
2613 Artikel
ModeratorIn

user image
[quote=Crian,23.07.2004, 15:40]Vielleicht solltest Du sagen, welche Zeichen man ausgeben soll, ich geb nur zwischen 32 und 127 inklusive aus, sonst halt einen Punkt.[/quote]
Dabeie kann [:print:] und use locale helfen (siehe meine Loesung zu RDW2)
Lieblingsmodule: CPAN:IPC::System::Simple, CPAN:Path::Class
esskar
 2004-07-23 17:51
#84826 #84826
User since
2003-08-04
7321 Artikel
ModeratorIn

user image
das hat ich mit binaer gemeint;
in der datei steht 100ig 0d 0a (\r\n);
du liesst dann aber (0d) \r nicht.
esskar
 2004-07-23 17:53
#84827 #84827
User since
2003-08-04
7321 Artikel
ModeratorIn

user image
meine version gibt alle zeichen > 31 aus ... alle <= 32 werden durch einen . ersetzt!

jetzt wird es natürlich verwirrend, wenn es jetzt 2 versch. Verständnisse zu dem thema gibt!
Crian
 2004-07-23 18:10
#84828 #84828
User since
2003-08-04
5866 Artikel
ModeratorIn
[Homepage]
user image
[quote=esskar,23.07.2004, 15:53]meine version gibt alle zeichen > 31 aus ... alle <= 32 werden durch einen . ersetzt!

jetzt wird es natürlich verwirrend, wenn es jetzt 2 versch. Verständnisse zu dem thema gibt![/quote]
Ok, dann passe ich mich dem an, alle Zeichen >= 32 werden ausgegeben, alle < 32 werden durh einen Punkt ersetzt.

In Deiner Angabe stimmt da was nicht (> 31 und <= 32 überlappt sich) :D
s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite
<< |< 1 2 3 4 5 ... 8 >| >> 74 Einträge, 8 Seiten



View all threads created 2004-07-23 13:33.