Anonymous user
Words containing "the" substring: Difference between revisions
m
→{{header|Smalltalk}}: ouch undid one too many...
(→{{header|Smalltalk}}: back to previous version; me stupid.) |
m (→{{header|Smalltalk}}: ouch undid one too many...) |
||
Line 671:
{{works with|Smalltalk/X}}
<lang smalltalk>'unixdict.txt' asFilename contents
select:[:word | (word size > 11) and:[word includesString:'the' caseSensitive:trueOrFalseWhoKnows]]
thenDo:#transcribeCR</lang>
Line 680:
|word|
((word := Stdin nextLine) size > 11
and:[word includesString:'the' caseSensitive:trueOrFalseWhoKnows]
) ifTrue:[
Stdout nextPutLine: word
|