ich hab diesen Lösungsvorschlag mal versucht, aber er gibt mir als fehlermeldung an:
fileparse(): need a valid pathname at functions.pm line 28
aber ich will kein spezifisches verzeichnis angeben sondern es soll immer das verzeichnis sein in dem das programm ausgeführt wird. wie kann ich das machen?

use File::Basename;

my @namendavor =();
my @array = glob('*.a00');

for(@array)
{
($name,$path,$suffix) = fileparse($fullname,@suffixlist); //line 28
print "$name\n";
push(@namendavor,$name);
}