At 14.57 +0200 on 97-08-18, Chris Nandor wrote: > At 02.54 8/18/97, Christian Huldt wrote: > >> The first beta release of perl 5.004 based MacPerl 5.1.4r4 is now >available > > > >Please correct me if I'm wrong, but I understand this version will run on a > >68K with CFM68K > > > >the problem I experience is this line: > >use Mac::Comm::OT_PPP; > >(which works with bigMacPerl5.1.3r2) > >the error points me to > >:lib:auto:DynaLoader:dl_findfile.al > >but I'm not convinced that the problem lies there... > > Hm. The only part of Mac::Comm::OT_PPP which uses DynaLoader is > Mac::AppleEvents. Do you have any other scripts that use Mac::AppleEvents? > > If not, try this script. I trequires that you have the Set Volume OSAX in > your System Folder:Extensions:Scripting Additions folder. Try each sub in > turn by uncommenting, then check to see what your system volume is set at > (if your Sound control panel is open, you may have to close and reopen it > before the new setting registers). The first routine should set it to 0 > (min), the second should set it to 7 (max). > > Unless you get an error, this should work. And if you get an error, it is > either a problem with your setup (i.e., you don't have AppleScript/Apple > Events or the OSAX installed) or with MacPel 5.1.4's Apple Events > module/Dynamic Loading. > > Good luck. > > #!perl -w > > #&do1; > #&do2; > > sub do1 { > use Mac::AppleEvents; > $be = >AEBuildAppleEvent('aevt','stvl',typeApplSignature,'MACS',0,0,"'----':0") || > die $^E; > $rp = AESend($be, kAEWaitReply) || die $^E; > if (AEPrint($rp) =~ /err/) { > print AEPrint($be),AEPrint($rp),"\n"; > } > } > > sub do2 { > &MacPerl::DoAppleScript('set volume 7'); > } > __END__ > > -- > Chris Nandor pudge@pobox.com http://pudge.net/ > %PGPKey=('B76E72AD',[1024,'0824 090B CE73 CA10 1FF7 7F13 8180 B6B6']) both gave: # Useless use of private array in void context. File 'c:MacPerl Ä:lib:auto:DynaLoader:dl_findfile.al'; Line 105 # Missing right bracket,File 'c:MacPerl Ä:lib:auto:DynaLoader:dl_findfile.al'; Line 108 # syntax error, at EOF File 'c:MacPerl Ä:lib:auto:DynaLoader:dl_findfile.al'; Line 108 File 'c:MacPerl Ä:lib:DynaLoader.pm'; Line 145 # BEGIN failed--compilation aborted. File 'c:MacPerl Ä:lib:Mac:AppleEvents.pm'; Line 336 # BEGIN failed--compilation aborted. File 'perl:Desktop Folder:CN's AE test.pl'; Line 7 # Scalars leaked: 5 with 5.1.4b1 and both worked flawlessly with 5.1.3r2 (big), so I assume it is not my setup (I use Applescript/Frontier daily, and just recently got RAM enough to run Perl thru Frontier which is a nice setup...) Christian <http://www.solvare.se/individer/christian/> ________________________________________________________ Solvare - mathematics consulting & macintosh automation <mailto:info@solvare.se> <http://www.solvare.se> ***** Want to unsubscribe from this list? ***** Send mail with body "unsubscribe" to mac-perl-request@iis.ee.ethz.ch