Help with Tk

--Apple-Mail-31--338149705
Content-Transfer-Encoding: 7bit
Content-Type: text/plain;
	charset=US-ASCII;
	delsp=yes;
	format=flowed

Im in a bit over my head - I have contributed to a script using Tk  
which seems to work fine on perl when running on the PC next to my  
mac. But Im having problems using it on my mac. The errors arise when  
I select files or folders from a dialog box for analysis by the  
script. The errors I get are (1) when trying to navigate up a level  
and (2) when trying to select a file or files. Any ideas?
Thanks
Anthony

(1)
Tk::Error: Can't use string ("Text *.txt") as an ARRAY ref while  
"strict refs" in use at /Library/Perl/5.8.6/darwin-thread- 
multi-2level/Tk/FBox.pm line 948.
  Tk callback for .fbox.frame
  Tk callback for .fbox.frame1
  Tk callback for .fbox.frame2
  Tk callback for .fbox
  Tk::FBox::GetFileTypes at /Library/Perl/5.8.6/darwin-thread- 
multi-2level/Tk/FBo
x.pm line 948
  Tk::FBox::Show at /Library/Perl/5.8.6/darwin-thread-multi-2level/Tk/ 
FBox.pm lin
e 279
  Tk::DialogWrapper at /Library/Perl/5.8.6/darwin-thread-multi-2level/ 
Tk.pm line
365
  Tk::FDialog at /Library/Perl/5.8.6/darwin-thread-multi-2level/Tk.pm  
line 388
  Tk::__ANON__ at /Library/Perl/5.8.6/darwin-thread-multi-2level/ 
Tk.pm line 270
  Tk::getOpenFile at /Library/Perl/5.8.6/darwin-thread-multi-2level/ 
Tk.pm line 32
2
  main::__ANON__ at qFishanalysis2.pl line 131
  Tk callback for .frame1.notebook.page1.button
  Tk::__ANON__ at /Library/Perl/5.8.6/darwin-thread-multi-2level/ 
Tk.pm line 249
  Tk::Button::butUp at /Library/Perl/5.8.6/darwin-thread-multi-2level/ 
Tk/Button.p
m line 111
  <ButtonRelease-1>
  (command bound to event)


AND

  (2)
Tk::Error: Failed to AUTOLOAD 'Tk::FBox::_get_select_Path' at  
qFishanalysis2.pl line 495
  Carp::croak at /System/Library/Perl/5.8.6/Carp.pm line 269
  Tk::Widget::__ANON__ at /Library/Perl/5.8.6/darwin-thread- 
multi-2level/Tk/Widget.pm line 347
  Tk::FBox::Done at /Library/Perl/5.8.6/darwin-thread-multi-2level/Tk/ 
FBox.pm line 909
  Tk::FBox::VerifyFileName at /Library/Perl/5.8.6/darwin-thread- 
multi-2level/Tk/FBox.pm line 678
  Tk::FBox::ActivateEnt at /Library/Perl/5.8.6/darwin-thread- 
multi-2level/Tk/FBox.pm line 647
  Tk::FBox::OkCmd at /Library/Perl/5.8.6/darwin-thread-multi-2level/ 
Tk/FBox.pm line 815
  Tk callback for .fbox.frame1.button
  Tk::__ANON__ at /Library/Perl/5.8.6/darwin-thread-multi-2level/ 
Tk.pm line 249
  Tk::Button::butUp at /Library/Perl/5.8.6/darwin-thread-multi-2level/ 
Tk/Button.pm line 111
  <ButtonRelease-1>
  (command bound to event)





--Apple-Mail-31--338149705--