<br><div><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;"><br><br>...but how about some additional awesome magic?</blockquote><div><br>Who doesn&#39;t like magic? :)
<br>&nbsp;</div><br><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">&nbsp;&nbsp;given ($variable) {<br>&nbsp;&nbsp;&nbsp;&nbsp;when (1) { # $variable == 1<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;do_something_one;
<br>&nbsp;&nbsp;&nbsp;&nbsp;}<br><br>&nbsp;&nbsp;&nbsp;&nbsp;when (@edge_cases) { # if $variable in @edge_cases<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;do_edge_case_handler;<br>&nbsp;&nbsp;&nbsp;&nbsp;}<br><br>&nbsp;&nbsp;&nbsp;&nbsp;when ($_ &gt; 10e6) { # if $variable is over a million<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;do_huge_handler;<br>&nbsp;&nbsp;&nbsp;&nbsp;}<br><br>&nbsp;&nbsp;&nbsp;&nbsp;when (\&amp;test) { # if test($_) is true
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;say &quot;the test was true!&quot;;<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;continue;<br>&nbsp;&nbsp;&nbsp;&nbsp;}<br><br>&nbsp;&nbsp;&nbsp;&nbsp;default {<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;default_handler;<br>&nbsp;&nbsp;&nbsp;&nbsp;}<br>&nbsp;&nbsp;}</blockquote><div><br>Regex?<br><br>___SNIP___<br><br>when ( /^\Q$somepattern\E$/)<br>
{<br>&nbsp; say &quot;seen $somepattern&quot;<br>}<br><br>___SNIP___<br>&nbsp;</div><br></div><br clear="all"><br>-- <br>"You are never dedicated to something you have complete confidence in. No one is fanatically shouting that the sun is going to rise tomorrow. They know it&#39;s going to rise tomorrow. "
<br>&nbsp;&nbsp;-- Robert M Pirsig