[MacPerl] MAC Filesystem Help

[asd@fns.com (Ameet Dhillon)]

I am new to MacPerl and am having some difficulty finding information to 
answer my questions. I have used Perl on Unix and DOS so I know the language 
fairly well. Any help or advice would be greatly appreciated. 

I need to convert the following DOS-Perl fragment to run on a MAC.
----------------------------------------------------------------------
# temporary file which contains the name of all files in "Frads"
system("ls c:/\Frads > temp"); # this needs to be converted to MAC

# open filehandle called "temp"
open(temp,"temp"); 

# read each file name 1 by 1
while ($direct = <temp>) {

	# create path to file
	$fname = "c:\\Frads\\" . "$direct"; # convert to MAC
	
	# open filehandle to current file
	open(input,"$fname");
-----------------------------------------------------------------------	
	
On the MAC I have a folder on the Desktop called "Frads" and this folder 
contains many (probably about 50) files. I want to open each file 1 by
1 (using a while statement as above) and then operate on the file. I guess the
main help I need is figuring out how to access the MAC file system so 
I can open each file in the "Frads" folder 1 by 1. I think this should be very
easy for anyone who has experience using MAC-perl.


						Thanks,
						Ameet
						

***** Want to unsubscribe from this list?
***** Send mail with body "unsubscribe" to mac-perl-request@iis.ee.ethz.ch