>>>>> "Charles" == Charles Albrecht <[EMAIL PROTECTED]> writes:

Charles> #!/usr/bin/perl -w 

Charles> system q(/usr/bin/open -a "`/usr/bin/osascript -e 'tell application "Finder" 
to get name of application file id "CWIE" ' `" );

Gah.  That's about four levels too deep.  Maybe that was a joke.  If not,
this is simpler:

my $path = `osascript -e 'tell application "Finder" to get name of application file id 
"CWIE"'`;

-- 
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<[EMAIL PROTECTED]> <URL:http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!

Reply via email to