package MODUL::ERRORCODE; use strict; use warnings; sub errormap { open( my $errormaplist, '<', 'errormap.txt' ) or die "Fehler: $!"; close $errormaplist; } 1;