fix up for presentation

diff --git a/Makefile b/Makefile
index 0f98a52f0386ff2e4468647f24a33639a6298fca..121bb74d666a903dc01611fb3ab8566fae084357 100644 (file)
--- a/Makefile
+++ b/Makefile
@@ -7,7 +7,7 @@ PLACKUP = plackup
 dotfiles = $(shell find . -iname '*.dot')
 svgfiles = $(patsubst %.dot,%.svg,$(dotfiles))
 
-all: $(svgfiles)
+all: offline
 
 clean:
        rm -f slides-offline.html remark.min.js $(SLIDES).pdf $(svgfiles)

diff --git a/css/slides.css b/css/slides.css
index 71ffcdcd100b991d4d99fd64b5c4b6b6cdb8d21f..790df676091486badb65deb9edcc7070ee48e0d7 100644 (file)
--- a/css/slides.css
+++ b/css/slides.css
@@ -53,6 +53,10 @@
     font-size: 22px;
 }
 
+#slide-perl-code .remark-code {
+    font-size: 26px;
+}
+
 #slide-last .talkqr img {
     display: inline-block;
     width: 230px;

diff --git a/slides.html b/slides.html
index 7625891b814c9e0d9feb283a1bd7c50658ea0e9f..430a5667a47c1d0fefd5090f20b89fa258f69a4a 100644 (file)
--- a/slides.html
+++ b/slides.html
@@ -19,6 +19,23 @@ name:   bluehost
 
 ---
 
+class:  center, middle
+name:   perl-code
+
+```perl
+@P=split//,".URRUU\c8R";@d=split//,"\nrekcah xinU / lreP rehtona tsuJ";sub p{
+@p{"r$p","u$p"}=(P,P);pipe"r$p","u$p";++$p;($q*=2)+=$f=!fork;map{$P=$P[$f^ord
+($p{$_})&6];$p{$_}=/ ^$P/ix?$P:close$_}keys%p}p;p;p;p;p;map{$p{$_}=~/^[P.]/&&
+close$_}%p;wait until$?;map{/^r/&&<$_>}%p;$_=$d[$q];sleep rand(2)if/\S/;print
+```
+
+Source: [Just Another Perl / Unix Hacker](http://perl.plover.com/obfuscated/) by Mark Jason Dominus
+
+???
+This is a Perl presentation, so I hope code that looks like this doesn't frighten you.
+
+---
+
 ## Agenda
 
 - Answer "What is PSGI?"