<p>How do I write a clean implementation of the strategy pattern in Perl? I want to do it in a way that leverages Perl's features.</p>

Use sub references, and closures. A good perlish example of this
```
```
sort { lc($a) cmp lc($b) } @items
```
```