sub display {
#    my $self = shift;
    my $file = shift;
    my %vars = @_;