$horiz->configure(-command => 
  sub { $dataFrame->xview(@_); $dataFrame->xview(@_) });

##</code><code>##

$horiz->configure(-command => 
  sub { $headFrame->xview(@_); $dataFrame->xview(@_) });