my($openokay) = open(MW,"+<$filename"); 

    if (!$openokay) {
        return 0;
    }