File extension is in extensions list: Difference between revisions
Content added Content deleted
m (→{{header|REXX}}: added a comment to the REXX section header as per the task's requirement.) |
(→{{header|zkl}}: update) |
||
Line 729: | Line 729: | ||
=={{header|zkl}}== |
=={{header|zkl}}== |
||
<lang zkl>fcn hasExtension(fnm){ |
|||
var [const] extensions=T(".zip",".rar",".7z",".gz",".archive",".a##"); |
|||
{{update|zkl}} |
|||
nm,ext:=File.splitFileName(fnm)[-2,*].apply("toLower"); |
|||
if(extensions.holds(ext)) True; |
|||
<lang zkl>var exts=T(".c",".o",""); |
|||
else if(ext==".bz2" and ".tar"==File.splitFileName(nm)[-1]) True; |
|||
else False |
|||
T("foo.C","foo.zkl","foo","foo.").apply(hasExtension).println();</lang> |
|||
} |
|||
foreach nm in (T("MyData.a##","MyData.tar.Gz","MyData.gzip","MyData.7z.backup", |
|||
"MyData...","MyData", |
|||
"MyData_v1.0.tAr.bz2","MyData_v1.0.bz2")){ |
|||
println("%20s : %s".fmt(nm,hasExtension(nm))); |
|||
}</lang> |
|||
{{out}} |
{{out}} |
||
<pre> |
|||
<pre>L(True,False,True,True)</pre> |
|||
MyData.a## : True |
|||
MyData.tar.Gz : True |
|||
MyData.gzip : False |
|||
MyData.7z.backup : False |
|||
MyData... : False |
|||
MyData : False |
|||
MyData_v1.0.tAr.bz2 : True |
|||
MyData_v1.0.bz2 : False |
|||
</pre> |