From 70eba92aecf65b27d73506a6d1e73b41d73a6eed Mon Sep 17 00:00:00 2001 From: Charles McGarvey Date: Fri, 15 Jul 2016 14:33:02 -0600 Subject: [PATCH] fix up for presentation --- Makefile | 2 +- css/slides.css | 4 ++++ slides.html | 17 +++++++++++++++++ 3 files changed, 22 insertions(+), 1 deletion(-) diff --git a/Makefile b/Makefile index 0f98a52..121bb74 100644 --- 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 71ffcdc..790df67 100644 --- 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 7625891..430a566 100644 --- 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?" -- 2.43.0