pr {1}} $foo {expr {2}} default {expr {3}}</PRE>
<P>
Using glob matching and the fall-through body is an alternative to
writing regular expressions with alternations, as can be seen here
(this returns <I>1</I>):
<P>
<PRE><B>switch</B> -glob aaab {
    a*b     -
    b       {expr {1}}
    a*      {expr {2}}
    default {expr {3}}
}</PRE>
<P>
Whenever nothing matches, the <B>default</B> clause (which must be
last) is taken.  This example has a result of <I>3</I>:
<P>
<PRE><B>switch</B> xyz {
    a -
    b {
 