| |||||||||||
| |||||||||||
Hash of FileNames and FileHandlers Posted by carlos (carlos), 19 April 2005 Hello,First of all Thanks for your answers. I am very new programming in Perl, so I have beginners problems. ![]() Ok, my problem: I read from one file some file names, after I would like to open them assigning dynamically theirs fileHandlers in a one hash, and then to access the file using the name as a key of the hash. I tried, but couldn't do. #This code does not work. It is only an idea what I want to do. #But I have not be able to do it open fh, "<FileList.txt" or die "Couldn't open file: FileList.txt $!"; @Files = split (/\n/,<fh>); %FilesHash = (); #e.g #%FilesHash = ( File1 => fh1, File2 => fh2); foreach $file (@File) { open <fh> "+>$file"; $FilesHash{$file} = fh; } $Xfile = "File01.txt" if( exists($FilesHash{$Xfile}) ) { #print <fh> "String to copy\n"; print $FilesHash{$Xfile} "String to copy\n"; } thanks in advance, Carlos Posted by admin (Graham Ellis), 19 April 2005 You can only store scalars in a hash .... and a file handle, unusually, is not a scalar. You'll have to use a typeglob.There's an example of using Typeglobs to handle a whole lot of file handles at the same time at http://www.wellho.net/resources/ex.php4?item=p301/splitter This page is a thread posted to the opentalk forum
at www.opentalk.org.uk and
archived here for reference. To jump to the archive index please
follow this link.
|
| ||||||||||
PH: 01144 1225 708225 • FAX: 01144 1225 793803 • EMAIL: info@wellho.net • WEB: http://www.wellho.net • SKYPE: wellho |