sub buildTables {
    while (<>) { 
        if (/regex/)
        { $theme_table{$1} = $2 }
        if (/regex/)
        { $taglist_table{$1} = $2 }
        if (/regex/)
        { $menu_table{$1} = $2 }
        }
        #print Dumper \%theme_table;
        #print Dumper \%taglist_table;
        #print Dumper \%menu_table;
}