my $items = [{
		name => 'Arbitrary menu name',
		url  => \&Arbitrary menu function,
	},{
		name => 'Arbitrary menu name 2',
		url  => \&Arbitrary menu 2,
	}];
  $callback->({
	items => $items
	});

##</code><code>##

opendir DIR, $currentDir or die "cannot open dir $currentDir: $!";
my @file= readdir DIR;
closedir DIR;
	my $items = [{
  	   name => 'Stuff',
           url  => \&Arbitrary menu,
	        foreach my $file (@file) {
                  },{
                  name => $file,
		  url  => \&Arbitrary menu 2,
                }
        }];
  $callback->({
	items => $items
  });