More and deeper examples.

1 files changed, 48 insertions, 6 deletions

diff --git a/doc/split.n b/doc/split.n
index b42c978..f3f979c 100644
--- a/doc/split.n
+++ b/doc/split.n
@@ -5,7 +5,7 @@
 '\" See the file "license.terms" for information on usage and redistribution
 '\" of this file, and for a DISCLAIMER OF ALL WARRANTIES.
 '\" 
-'\" RCS: @(#) $Id: split.n,v 1.3 2000/09/07 14:27:51 poenitz Exp $
+'\" RCS: @(#) $Id: split.n,v 1.4 2004/05/11 21:20:22 dkf Exp $
 '\" 
 .so man.macros
 .TH split n "" Tcl "Tcl Built-In Commands"
@@ -30,15 +30,57 @@ character of \fIstring\fR is in \fIsplitChars\fR.
 If \fIsplitChars\fR is an empty string then each character of
 \fIstring\fR becomes a separate element of the result list.
 \fISplitChars\fR defaults to the standard white-space characters.
-For example,
+.SH EXAMPLES
+Divide up a USENET group name into its hierarchical components:
 .CS
-\fBsplit "comp.unix.misc" .\fR
+split "comp.lang.tcl.announce" .
+     \fB=> comp lang tcl announce\fR
 .CE
-returns \fB"comp unix misc"\fR and
+
+See how the \fBsplit\fR command splits on \fIevery\fR character in
+\fIsplitChars\fR, which can result in information loss if you are not
+careful:
+.CS
+split "alpha beta gamma" "temp"
+     \fB=> al {ha b} {} {a ga} {} a\fR
+.CE
+
+Extract the list words from a string that is not a well-formed list:
+.CS
+split "Example with {unbalanced brace character"
+     \fB=> Example with \\{unbalanced brace character\fR
+.CE
+
+Split a string into its constituent characters
 .CS
-\fBsplit "Hello world" {}\fR
+split "Hello world" {}
+     \fB=> H e l l o { } w o r l d\fR
+.CE
+.SS "PARSING RECORD-ORIENTED FILES"
+Parse a Unix /etc/passwd file, which consists of one entry per line,
+with each line consisting of a colon-separated list of fields:
+
+.CS
+## Read the file
+set fid [open /etc/passwd]
+set content [read $fid]
+close $fid
+
+## Split into records on newlines
+set records [split $content "\\n"]
+
+## Iterate over the records
+foreach rec $records {
+
+   ## Split into fields on colons
+   set fields [split $rec ":"]
+
+   ## Assign fields to variables and print some out...
+   lassign $fields \\
+         userName password uid grp longName homeDir shell
+   puts "$longName uses [file tail $shell] for a login shell"
+}
 .CE
-returns \fB"H e l l o { } w o r l d"\fR.
 
 .SH "SEE ALSO"
 join(n), list(n), string(n)