my @tokens = split /\|/,$t;  # I can't remember if | needs to be escaped or not