my $frame = AbiWord::XAP_Frame::getLastFocussed;
my $view = $frame->getCurrentView;
$view->write("Body 1\n");
$view->editHeader;
$view->write("Header");
$view->editFooter;
$view->write("Footer");
$view->editBody;
$view->write("Body 2\n");
1;