add Git::Raw example

2013/sf.pm/git-raw-example.pl

@@ -0,0 +1,7 @@
+my $url  = 'git://github.com/git/git.git';
+my $repo = Git::Raw::Repository->clone($url,
+            'git', { bare => 0 });
+# print all the tags of the repository
+for my $tag (@{ $repo -> tags }) {
+    say $tag -> name;
+}

2013/sf.pm/pres.tex

@@ -113,6 +113,7 @@
     \end{center}
 }
 
+
 \frame{
     \frametitle{What *is* Git, exactly?}
     Git 1.x
@@ -153,6 +154,23 @@
     \end{center}
 }
 
+\frame{
+    \frametitle{What *is* Git, exactly?}
+    Using libgit2 from Perl 5
+    \begin{center}
+        \begin{itemize}
+        \item Git::Raw;
+        \item Low-level access to Git objects
+        \item Plumbing, not porcelain
+        \end{itemize}
+    \end{center}
+}
+
+\frame{
+    \frametitle{What *is* Git, exactly?}
+    Git::Raw example
+    \lstinputlisting{git-raw-example.pl}
+}
 \frame{
     \frametitle{What *is* Git, exactly?}
     github.com/creationix/js-git