count files in a directory

This will give you the count of "files" in a directory:

my $dirname = "/home/oracle/test/Oracle/oradata";

opendir my $DIR, $dirname or die "Error in opening dir '$dirname' beca
+use: $!";

my $count = grep -f "$dirname/$_", readdir $DIR;

closedir $DIR;
[download]