@array = ("datei1", "datei2", "datei3");
foreach(@array)
{
    unless(open(DATEI, "<z:\\$_")){
        next;
    }
    else{
        # lese datei ein...
    }
}