opendir VDIR, $VERSIONS_DIR or die "Couldn't open $VERSIONS_DIR: $!"; @contents = grep !/^\.\.?$/, readdir VDIR; print $#contents . "\n\n"; if ($#contents eq 0) { $versions_is_empty = true; } else { $versions_is_empty = false; } if ($versions_is_empty) {