my %hash = $token->[2];
        #    below wont work unless i feed it a hash
        #    my $key;
        #    foreach $key (keys %hash) {
        #    print "at $key we have $hash{$key}\n";
        #    }