Jump to content

File extension is in extensions list: Difference between revisions

→‎{{header|Perl 6}}: extensions aren't always alphanumeric
(+Java, probably complex)
(→‎{{header|Perl 6}}: extensions aren't always alphanumeric)
Line 86:
 
for < foo.C foo.zkl foo foo. > {
when / :i @ext $ / { say "$_\t$/ is in the list" }
when / '.' \w<-[.]>* $ / { say "$_\t$/ is not in the list" }
default { say "$_\t (has no extension)" }
}</lang>
{{out}}
Anonymous user
Cookies help us deliver our services. By using our services, you agree to our use of cookies.