For a simple look at directories, look at opendir, readdir, closedir and perldoc -f -X to test if a file is a normal file, a directory, or something else.

You probably want File::Find and a bit of thought.