sub exampleNav{
my $self = shift;
my @nav = qw(Nav1, Nav2, Nav3);
return \@nav;
}