To read the full subfolder path and write the path into textfile

I am trying to read folder and subfolder and print their name into a text file.I am able to read the folder and its content and write it to the textfile but I am not able to read the content of the subfolder and write its content..FOR Eg : I have
folder1\text1
folder1\text2
folder1\folder2\text3
I am reading folder1 and it is writing text1,text2 and folder2 in another textfile.I need to print the total structure of the subfolder ..like folder2\text3..not just folder2.my code is as following

Expand|Select|Wrap|Line Numbers

 
#!C:\home\bin\perl -w
 
open (MyHandle,">C\:\\ravi\\ravilist.txt") or die("File Open Error");

opendir MYDIR, "C\:\\folder1";

@contents = grep !/^\.\.?$/, readdir MYDIR;

closedir MYDIR;

foreach $listitem ( @contents )

{

  print MyHandle $listitem;

  print MyHandle "\n";

}

Mar 7 '08 #1

Subscribe Post Reply

3245

nithinpes

410

Expert 256MB

You are reading only from the main directory, if you want to read contents of subfolder you have to open them using opendir() again:

Expand|Select|Wrap|Line Numbers

 
foreach $listitem(@contents)

{

  if(-d "C:\\folder1\\$listitem") { #check for directories

  opendir TEMPDIR, "C:\\folder1\\$listitem" or die "failed:$!";

  my @subcontents = grep !/^\.\.?$/, readdir TEMPDIR;

  close TEMPDIR;

  print MyHandle "$listitem\\$_ \n" foreach(@subcontents);   

   }

 else {

   print MyHandle "$listitem\n";

}

}

Mar 7 '08 #2

KevinADC

4,059

Expert 2GB

File::Find will find all the subfolders of any top level folder.

Mar 7 '08 #3

Similar topics

Extract path from path & filename

by: Paul | last post by:

Hi, Using the code below I can extract the filename from a path but I would like to know how to get just the path too. So if the full path is "C:\A Long Time Ago\In A Galaxy\Far Far...

.NET Framework

[path-PEP] Path inherits from basestring again

by: Reinhold Birkenfeld | last post by:

Hi, the arguments in the previous thread were convincing enough, so I made the Path class inherit from str/unicode again. It still can be found in CVS:...

Python

Write to textfile in ANSI format

by: Thomas A | last post by:

Hi, I write a string value to a textfile , if the string dont contains swedish Å,Ä and Ö , the file will be written in ANSI. So far so god but.... If the string contains Å or Ä or Ö ,the...

Visual Basic .NET

Read and Write to TextFile with

by: Sam | last post by:

Hi guys If I have to read/write a text file which has the following format, what would be the best way to read it? Should I readline method of the streamreader to a string variable and parse it...

Visual Basic .NET

relative path / absolute path

by: Jerry M. Gartner | last post by:

Greetings: What is the best way to resolve paths within a document regardless of what path it is opened under? For example: I have x.php and it contains <img src="images...">, (amongst other...

PHP

FULL URL from VIRTUAL path

by: tommaso.gastaldi | last post by:

Hi friends I was in the need to find a sort of "definitive" :) solution to transform a virtual path such as "~/MyDir/MyFile into a full web address. In particular I needed it * within web...

ASP.NET

Returning subfolder name with path name

by: woolls01 | last post by:

I am using the following code Sub Ck() Dim strStartPath As String strStartPath = "d:\workpack\rra" ListFolder strStartPath End Sub

Visual Basic 4 / 5 / 6

How to find cyclic path and path between two nodes using depth first search

by: Man4ish | last post by:

Hi , How we can find the cyclic path and path between two nodes using Depth first search algorithm in Graph Data Structure. Can i get Pseudo code or code doing the same.I will be very much thankful...

C / C++

How to Retrieve all file names and write to TextFile

by: lenniekuah | last post by:

Hi Good Guys, I need your help. Please help me. My office BA requested me to develop Window application to retrieve all the files from the SalesDepartment folder : F:\SalesDept and write the name...

Visual Basic .NET

How to turn on java script in a villaon keypad mobile phone

by: Charles Arthur | last post by:

How do i turn on java script on a villaon, callus and itel keypad mobile phone

Java

Merging data from multiple Excel files

by: ryjfgjl | last post by:

In our work, we often receive Excel tables with data in the same format. If we want to analyze these data, it can be difficult to analyze them because the data is spread across multiple Excel files...

Data Management

Migrating Website to Cloud - Emmanuel Katto

by: emmanuelkatto | last post by:

Hi All, I am Emmanuel katto from Uganda. I want to ask what challenges you've faced while migrating a website to cloud. Please let me know. Thanks! Emmanuel

General

Navigating the Data Structures and Algorithms (DSA)

by: BarryA | last post by:

What are the essential steps and strategies outlined in the Data Structures and Algorithms (DSA) roadmap for aspiring data scientists? How can individuals effectively utilize this roadmap to progress...

Algorithms / Advanced Math

Looking to do Android software development, any suggestions? Is flutter better?

by: nemocccc | last post by:

hello, everyone, I want to develop a software for my android phone for daily needs, any suggestions?

General

How to build RAID in BIOS?

by: Hystou | last post by:

There are some requirements for setting up RAID: 1. The motherboard and BIOS support RAID configuration. 2. The motherboard has 2 or more available SATA protocol SSD/HDD slots (including MSATA, M.2...

Computer Hardware

What is ONU?

by: marktang | last post by:

ONU (Optical Network Unit) is one of the key components for providing high-speed Internet services. Its primary function is to act as an endpoint device located at the user's premises. However,...

General

Problem With Comparison Operator <=> in G++

by: Oralloy | last post by:

Hello folks, I am unable to find appropriate documentation on the type promotion of bit-fields when using the generalised comparison operator "<=>". The problem is that using the GNU compilers,...

C / C++

Maximizing Business Potential: The Nexus of Website Design and Digital Marketing

by: jinu1996 | last post by:

In today's digital age, having a compelling online presence is paramount for businesses aiming to thrive in a competitive landscape. At the heart of this digital strategy lies an intricately woven...

Online Marketing