lipsum

gugod · Oct 1, 2009 · c9d661a · c9d661a
1 parent 4d4236e
commit c9d661a
Showing 1 changed file with 11 additions and 0 deletions.
diff --git a/lipsum b/lipsum
@@ -0,0 +1,11 @@
+#!/bin/sh
+
+if [ -e $1 ]
+then
+    lipsum=`perl -l -MText::Greeking -e '$g=Text::Greeking->new; print $g->generate, "\n";' `
+else
+    lipsum=`perl -l -MText::Greeking::zh_TW -e 'print Text::Greeking::zh_TW->new->generate;' `
+fi
+
+echo $lipsum | pbcopy
+echo $lipsum