如何解决如何检查char是否符合charset？
tl; dr无法解析为使用单个字母
我目前正在学习Red，所以我可能缺少基本的知识，但总的来说，我想检查密码是否包含大写字符；这是我的第一次尝试（我知道这在逻辑上是无效的）：
num-uppercase: (length? (difference/case password (lowercase password))) / 2
这个想法是将其转换为小写字符串，然后进行比较，但是difference似乎将字符串转换为set（？）。
现在我从那开始，像这样遍历每个字母：
is-uppercase: false
foreach letter password [
if letter <> lowercase letter [
is-uppercase: true
break
]
]
但是后来我想检查单个char! letter是否是特殊字符：
foreach letter password [
if parse letter special [
is-special: true
]
]
但是我得到一个错误：
*** Script Error: parse does not allow char! for its input argument
*** Where: parse
*** Stack:
我一直在寻找一种能够检查char是否符合charset的方法，但是不能。
解决方法
Parse几乎适用于任何类型的系列：也就是说，具有一系列连续放置的项目。 char!就是这样的系列，但是>> series? #"."
== false
>> scalar? #"."
== true
却不是。
bitset!要检查密码是否包含大写字符，首先需要创建一个代表此类字符的>> upper: charset [#"A" - #"Z"]
== make bitset! #{00000000000000007FFFFFE0}
：
>> parse "YES" [some upper]
== true
>> parse "no" [some upper]
== false
在那之后，您可以用它来构造一个解析规则并检查输入的一致性；例如，密码是否全部大写？有些输入会匹配，有些则不会。
>> parse "Sentence" [upper to end]
== true
>> parse "Sentence" [upper any [not upper skip]]
== true
是用句子写的吗？您将要想到的不同语法可以产生相同的结果。
>> parse "aBc" [to upper to end]
== true
>> parse "abc" [to upper to end]
== false
最后，如果要检查是否至少有一个大写字母，应该执行以下操作：
>> parse "aBc" [thru upper any [not upper skip]]
== true
>> parse "aBC" [thru upper any [not upper skip]]
== false
如果您要查找的密码只有一个大写字母，没有更多，那么：
charset!要直接回答原始问题：如果您有char!和>> pick upper #"a"
== false
>> pick upper #"A"
== true
>> pick upper [#"A" #"b"]
== false
>> pick upper [#"A" #"B"]
== true
>> pick upper "Ab"
== false
>> pick upper "AB"
== true
，则可以使用以下命令检查后者是否属于前者：
node:events:304
throw er; // Unhandled 'error' event
^
Error: listen EADDRINUSE: address already in use :::3000
at Server.setupListenHandle [as _listen2] (node:net:1286:16)
at listenInCluster (node:net:1334:12)
at Server.listen (node:net:1420:7)
at Function.listen (/home/abubakar/Desktop/Node/express/node_modules/express/lib/application.js:618:24)
at Object.<anonymous> (/home/abubakar/Desktop/Node/express/my_app.js:24:5)
at Module._compile (node:internal/modules/cjs/loader:1083:30)
at Object.Module._extensions..js (node:internal/modules/cjs/loader:1112:10)
at Module.load (node:internal/modules/cjs/loader:948:32)
at Function.Module._load (node:internal/modules/cjs/loader:789:14)
at Function.executeUserEntryPoint [as runMain] (node:internal/modules/run_main:72:12)
Emitted 'error' event on Server instance at:
at emitErrorNT (node:net:1313:8)
at processTicksAndRejections (node:internal/process/task_queues:80:21) {
code: 'EADDRINUSE',errno: -98,syscall: 'listen',address: '::',port: 3000
}
[nodemon] app crashed - waiting for file changes before starting...
我强烈建议您在处理Parse（FYI拥有官方documentation）之前，先将Red带上轴承。最好的方法是加入Gitter chat，以迅速获得有关您的问题和代码的帮助，并研究社区提供的learning resources； Rebol/Core User Guide是一个很好的起点。
,红色中的另一种解决方案是将char!转换为integer!并使用path notation：
>> special: charset ".:?"
== make bitset! #{0000000000020021}
>> special/(to integer! #"a")
== false
>> special/(to integer! #".")
== true
我可以使用to-string将char转换为字符串。这是一种方法。
parse to-string #"." [special]
没有解析，但是根据您想要第一次尝试得到的结果
>> strict-equal? lowercase copy pass: "ABcc" pass
== false
>> strict-equal? lowercase copy pass: "abcc" pass
== true
您需要 copy ，因为它会更改原始的 strict-equal？，因为普通的 equal？不能区分大写和小写。
差异显示两组的不同项。请参见帮助差异。 您可以从中获得与众不同的解决方案
>> same: empty? difference/case pass: "ABcc" lowercase copy pass
== false
>> same: empty? difference/case pass: "aabc" lowercase copy pass
== true
对于单个字符，static void Main(string[] args)
{
var userValues = new List<UserValue>
{
new UserValue { FieldId = 1,FieldValue = "2"},new UserValue { FieldId = 2,FieldValue = "3"},new UserValue { FieldId = 4,FieldValue = "5"}
};
var lookupMetas = new List<LookupMeta>
{
new LookupMeta { FieldId = 1,Id = 2,FieldValueId = 20 },new LookupMeta { FieldId = 2,Id = 3,FieldValueId = 30 },new LookupMeta { FieldId = 3,Id = 4,FieldValueId = 40 },};
var comparer = new IntermediateKeyComparer();
var result = userValues
.GroupJoin(
lookupMetas,uv => new IntermediateKey { Id = uv.FieldId,Value = uv.FieldValue },lm => new IntermediateKey { Id = lm.FieldId,Value = lm.Id.ToString() },(uv,lm) => new { Value = uv,Lookups = lm},comparer)
.SelectMany(
pair => pair.Lookups.DefaultIfEmpty(),(x,meta) => new { Value = x.Value,Lookup = meta})
.Select(res =>
{
res.Value.FieldValue = res.Lookup?.FieldValueId.ToString() ?? res.Value.FieldValue;
return res.Value;
});
foreach (var maybeUpdatedUserValue in result)
{
Console.WriteLine($"{maybeUpdatedUserValue.FieldId}: {maybeUpdatedUserValue.FieldValue}");
}
}
也可以与字符集一起使用。
1: 20
2: 30
4: 5
版权声明：本文内容由互联网用户自发贡献，该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容， 请发送邮件至 dio@foxmail.com 举报，一经查实，本站将立刻删除。
