Schrift
[thread]7230[/thread]

binär auslesen



<< >> 6 Einträge, 1 Seite
DonDoedel
 2005-08-25 14:12
#57378 #57378
User since
2005-08-25
2 Artikel
BenutzerIn
[default_avatar]
ich habe hier eine binäre datei, die unter pascal erstellt wurde. der inhalt sieht in etwa so aus:
Code: (dl )
1
2
3
4
5
6
7
8
9
10
Type Daten = Record 
Name,
Vorname : String[30];
Strasse : Sting[50];
Plz: LongInt;
Wohnort : String[50];
Daten_1,
Daten_2,
Daten_3 : Word;
End;


wie kann ich das denn auslesen? ich möchte gerne, wie unter pascal, eine variable vom typ daten benutzen, in die ich dann mittels
Code: (dl )
read($datei,$var,sizeof(Daten))
o.ä. zugreifen kann.

wie geht das mit perl?
renee
 2005-08-25 14:20
#57379 #57379
User since
2003-08-04
14371 Artikel
ModeratorIn
[Homepage] [default_avatar]
Code: (dl )
1
2
3
open(FILEHANDLE,"<$file") or die $!;
binmode FILEHANDLE;
[...auslesen wie gewollt...]


siehe perldoc -f binmode
OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/
Gast Gast
 2005-08-25 14:49
#57380 #57380
[quote=DonDoedel,25.08.2005, 12:12]ich habe hier eine binäre datei, die unter pascal erstellt wurde. der inhalt sieht in etwa so aus:
Code: (dl )
1
2
3
4
5
6
7
8
9
10
Type Daten = Record 
Name,
Vorname : String[30];
Strasse : Sting[50];
Plz: LongInt;
Wohnort : String[50];
Daten_1,
Daten_2,
Daten_3 : Word;
End;


wie kann ich das denn auslesen? ich möchte gerne, wie unter pascal, eine variable vom typ daten benutzen, in die ich dann mittels
Code: (dl )
read($datei,$var,sizeof(Daten))
o.ä. zugreifen kann.

wie geht das mit perl?[/quote]
perldoc -q fixed-record könnte helfen.

Perl hat übrigens keinen Datentyp "Daten". Siehe perldoc perldata.
DonDoedel
 2005-08-25 17:52
#57381 #57381
User since
2005-08-25
2 Artikel
BenutzerIn
[default_avatar]
ich weiß, daß ich binmode setzen muß. ich weiß aber immer noch nicht, wie ich einen record (a la pascal), mit fixen angaben (z.b. string[30]) in perl setzen kann.
Gast Gast
 2005-08-25 18:29
#57382 #57382
Siehe perldoc -q fixed-record.

Deja-Vu ..\n\n

<!--EDIT|phaylon|1124980178-->
ptk
 2005-08-25 19:41
#57383 #57383
User since
2003-11-28
3645 Artikel
ModeratorIn
[default_avatar]
Convert::Binary::C ist ein bequemes CPAN-Modul, aber ist leider nur fuer C-Datenstrukturen gedacht. Aber vielleicht kann man die Pascal-Datenstrukturen dahingehend trimmen...
<< >> 6 Einträge, 1 Seite



View all threads created 2005-08-25 14:12.