[MacPerl] GUSI.ph questions

[Nicholas.G.Thornton@directory.reed.edu (Nicholas G. Thornton)]

$prompt = "Select a file...";
$default = ":";
$file = MacPerl::Choose(
     &GUSI::AF_FILE,
     0, 
     $prompt,
     &GUSI::pack_sa_constr_file(@types), 
     ($default ? &GUSI::CHOOSE_DEFAULT : 0),
     $default);
push @ARGV, $file;

Given the above code which is basically what I got when I asked how to do what is does (I know that sounds bad). I have a few questions. One) what should $default be to assume the same directery as where the script is? two) what use is @types?

e meas,
--Nick

# ===== Want to unsubscribe from this list?
# ===== Send mail with body "unsubscribe" to macperl-request@macperl.org