externe Daten einbinden

[Struppi]

Dabei ist es bestimmt ein trivialer Fehler.

Nö, ist es nicht.

Variante 2:

#!/usr/bin/perl -w
use strict;
use CGI;
use CGI::Carp qw(fatalsToBrowser);

......
my %Zuordnung;
use Zuordnung;
my $s = "zb";
my $erg;

$erg = $Zuordnung{"$s"};

>   
> Programm Zuordnung.pm (im gleichen Verzeichnis wie zugehöriges Hauptprogramm):  
>   
> ~~~perl
  

> package Zuordnung;  
> use strict;  
> my %Zuordnung = (  
>                    "ar"     => "autoradio",  
>                    "zb"     => "zahnbürste",  
>                    "xy"     => "aaaaaa"  
>                   );  
> 

Wenn du mit packages arbeiten willst muss du den Hash exportieren oder du kannst ihn auch überall mit our deklarieren.

Struppi.