[MacPerl] Re:

[Mamoru Yamanishi <yama@biotech.okayama-u.ac.jp>]

Hi,

>open(INFILE,'array:javed14.pl') or die "Can't open input. \t";
>
>where javed14.pl is a file in a folder called array. The folder is on the
>desktop of my powerbook 5300c. I get the can't open message. Is there some
>better way of specifying where the file is? I'd greatly appreciate help.

If you do not wish to run your script under other environment than MacOS,
the followings are very usefull to get full path name of the file.
And also these method are safe and familier to Mac user.

	require "GUSI.ph";

	die "Can't open input.\n" unless 
		($file = &MacPerl'Choose(&GUSI'AF_FILE, 0, "", 
			&GUSI'pack_sa_constr_file("TEXT"))) ;
	open(THIS, $file);

The samples are in "{MacPerl}t:mac:Choose.t".  Try to run this script.

-------------------------------------------------
Mamoru Yamanishi <yama@biotech.okayama-u.ac.jp>
+81-86-251-8196(voice), +81-86-251-8264(GIII fax)
Biotech. Dept., Okayama Univ.



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