Extract file extension: Difference between revisions

Content added Content deleted
(→‎{{header|Tcl}}: Added zkl)
m (→‎{{header|zkl}}: spelling)
Line 507: Line 507:
L("","","file",".odd_one"))
L("","","file",".odd_one"))
</pre>
</pre>
The last too are odd ducks so some code is in order:
The last one is an odd duck so some code is in order:
<lang zkl>fcn exonly(fileName){
<lang zkl>fcn exonly(fileName){
var re=RegExp(0'|\.[a-zA-Z0-9]+$|);
var re=RegExp(0'|\.[a-zA-Z0-9]+$|);