--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/script3.stx	Wed Jun 11 12:28:19 2014 +0200
@@ -0,0 +1,11 @@
+#!stx --script
+"/
+"/ a word count script
+"/
+|wc|
+
+wc := 0.
+[Stdin atEnd] whileFalse:[
+    wc := wc + Stdin nextLine asCollectionOfWords size.
+].
+wc printCR.