einlesen bearbeiten und ausgeben - #113892 (Allgemeines zu Perl)

renee

2008-08-22 13:47

User since
2003-08-04
14371 Artikel
ModeratorIn

Du öffnest die Dateien nur zum Lesen!

Zum Schreiben öffnet man eine Datei so: open(AUSGABEDATEI,'>',$ARGV[1]) or die $!;

Dann hast Du noch überall das Semikolon vergessen, die Fehlerbehandlung hast Du auch weggelassen.

Im Schleifenkopf der while-Schleife muss es <EINGABEDATEI> heißen.

Statt chop solltest Du chomp verwenden.

Du solltest mit Wiki:

use strict arbeiten.

Etwas Schreibarbeit kannst Du Dir auch sparen, indem Du aus

Code (perl): (dl )

$hash{AL}="052001";
$hash{AB}="052003";
$hash{HX}="052363";
$hash{BRE}="052324";

das hier machst:

Code (perl): (dl )

 my %hash = (
  AL => '052001',
  AB => '052003',
  HX => '052363',
  BRE => '052324',
);

Und bitte verwende das nächste Mal die perl- oder code-Tags...

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/