How to read the directories and sub directories using Perl variable?

See more:

Perl

I have the below code how can i read the contents from the text file and check with directories and sub directories names exists or not using perl.

Note:result_file.txt has contents.Each contents denotes the directories/subdirectories in the current location.

What I have tried:

<pre>open( my $fh2, '<', "result_file.txt" ) || die( $! ))
{
while ( my $row = <$fh2> ) {
	chomp $row;
	my $dir = $row;
      print $dir,"\n";
	#print "****$row****";
}
close($fh2);
}