<pre><code>package Person;
use Moose;
-<span class="highlight">with 'Printable';</span></code></pre>
+<span class="highlight">with 'Printable';</span>
+
+sub as_string { $_[0]->first_name() }</code></pre>
</div>
<div class="slide">
<span class="delete">with 'Printable';</span>
+sub as_string { $_[0]->first_name() }
+
<span class="highlight">has has_been_printed => ( is => 'rw' );
sub print {
<h1>Real Examples</h1>
<ul>
- <li>Column and ColumnAlias both <em>do</em> ColumnLike</li>
- <li>ColumnLike things can be used in certain parts of queries</li>
<li>All queries <em>do</em> HasWhereClause</li>
<li>Select <em>does</em> Comparable and Selectable (for subselects)</li>
<li>A where clause requires its components to <em>do</em> Comparable</li>