RosettaCodeData/Task/String-matching/Min/string-matching.min

8 lines
231 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
(indexof 0 ==) :starts-with?
(indexof -1 !=) :contains?
((/ $/) swap 1 insert "" join regex ("") !=) :ends-with?
"minimalistic" "min" starts-with? puts!
"minimalistic" "list" contains? puts!
"minimalistic" "list" ends-with? puts!