X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=slideshow.html;h=485e759559ff4eb4b23ac3b7ee6559d7874927c2;hb=refs%2Fheads%2Fmaster;hp=da96a639fe4bfacf4f43358e8ba25095a41f7a6d;hpb=63d0b68044758e41e028b934c15d79609fc8b701;p=dbsrgits%2Fdbix-class-introduction-presentation.git

diff --git a/slideshow.html b/slideshow.html
index da96a63..485e759 100644
--- a/slideshow.html
+++ b/slideshow.html
@@ -74,6 +74,15 @@
    </div>
 
    <div class="slide">
+      <h1>Contact Info</h1>
+      <ul>
+         <li>IRC: irc.perl.org #dbix-class</li>
+         <li>ML: <a href="http://lists.scsys.co.uk/mailman/listinfo/dbix-class">http://lists.scsys.co.uk/mailman/listinfo/dbix-class</a></li>
+         <li><a href="http://search.cpan.org/perldoc?DBIx::Class">DBIx::Class</a> yo</li>
+      </ul>
+   </div>
+
+   <div class="slide">
       <h1>Authors</h1>
       <h4>Originally Leo Lapworth @ LPW 2009</h4>
       <h4>Amiri Barksdale</h4>
@@ -89,7 +98,7 @@
                <li>DBIC?</li>
                <li>Class::DBI?</li>
                <li>Rose::DB?</li>
-               <li>Fey?</li>
+               <li>Fey::ORM?</li>
                <li>Others?</li>
             </ul></li>
             <li>AR?</li>
@@ -272,6 +281,33 @@ $delete-&gt;execute(<strong>$book_id</strong>);</pre>
    </div>
 
    <div class="slide">
+      <h1>SQL: Search</h1>
+<pre>my $sth = $dbh-&gt;prepare('
+   SELECT title,
+   authors.name as author_name
+   FROM books
+   WHERE books.name LIKE "%monte cristo%" AND
+   books.topic = "jailbreak"
+');
+</pre>
+   </div>
+
+   <div class="slide">
+      <h1>DBIC: Search</h1>
+<pre>
+my $book = $book_rs-&gt;<a href="http://search.cpan.org/perldoc?DBIx::Class::ResultSet#search">search</a>({
+   'me.name'  =&gt; { -like =&gt; '%monte cristo%' },
+   'me.topic' =&gt; 'jailbreak',
+})-&gt;<a href="http://search.cpan.org/perldoc?DBIx::Class::ResultSet#next">next</a>;
+</pre>
+      <ul class="incremental">
+         <li><a href="http://search.cpan.org/perldoc?SQL::Abstract">SQL::Abstract</a></li>
+         <li>(kinda) introspectible</li>
+         <li>Prettier than SQL</li>
+      </ul>
+   </div>
+
+   <div class="slide">
       <h1>OO Overidability</h1>
       <ul class="incremental">
          <li>Override new if you want to do validation</li>
@@ -423,17 +459,6 @@ my $schema = Foo::Schema-&gt;connect(
    </div>
 
    <div class="slide">
-      <h1><a href="http://search.cpan.org/perldoc?SQL::Abstract">SQL::Abstract</a></h1>
-<pre>my $resultset = $book_rs-&gt;search({
-   name =&gt; { -like =&gt; "%$nick%" },
-});</pre>
-      <ul class="incremental">
-         <li>(kinda) introspectible</li>
-         <li>Prettier than SQL</li>
-      </ul>
-   </div>
-
-   <div class="slide">
       <h1>Result vs ResultSet</h1>
          <ul class="incremental">
             <li>Result == Row</li>