Opening file with application

[John Delacour]

This script opens a text file in Excel (in my case a Classic app).
Is there any way to do the same thing without a hard-code pathname
for Excel and without Apple Events?


#!/usr/bin/perl
$dir = "$ENV{HOME}" ;
$xl = `osascript -e '
tell app "Finder" to "" & «class appf» id "XCEL"
POSIX path of result'` ; chomp $xl ;
$xl = "'$xl'" ;
$fout = "$dir/junk.txt" ;
open FOUT, ">$fout" ;
print FOUT "A\t1\rB\t2" ;
close FOUT ;
`open -a $xl $fout` ;

JD