I'm trying to use DBD::XBase to read a file using a filehandle from Filesys::Smbclient.
I've gotten this far:

#!/user/bin/perl

use Filesys::SmbClient;
use XBase;

my $smb = new Filesys::SmbClient(username=>  "MYUSER",
                                 password=>  "**********",
                 workgroup=> "LAZYGROUP");
                 
my $smbfilehandle = $smb->open("smb://myserver/myshare/databases/readt
+histable.dbf");

XBase::Base::SEEK_VIA_READ(0);
my $thistable = new XBase("-", 'fh' => $smbfilehandle, 'ignorememo' =>
+ 1);

$thistable->dump_records("fs" => " | ", "rs" => " <-+\n",
            "fields" => [ "location", "filename" ]);

$smb->closedir($thistable);
[download]

I get this error:

Can't call method "autoflush" without a package or objectt reference a
+t /usr/lib/perl5/vendor_perl/5.8.1/XBase/Base.pm line 106.
[download]

the problem seems to be that the filehandle for SmbClient doesn't have an autoflush function
the docs for Filesys::Smbclient mention using tie() but I'm having trouble figuring out if that's something related to my problem.
suggestions?