Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!uunet!convex!usenet
From: tchrist@convex.COM (Tom Christiansen)
Newsgroups: comp.lang.perl
Subject: Re: wrapping of "options" in formatted output
Message-ID: <1991Jun20.200051.17076@convex.com>
Date: 20 Jun 91 20:00:51 GMT
References: <1991Jun20.180323.20507@dsd.es.com>
Sender: usenet@convex.com (news access account)
Reply-To: tchrist@convex.COM (Tom Christiansen)
Organization: CONVEX Software Development, Richardson, TX
Lines: 30
Nntp-Posting-Host: pixel.convex.com

From the keyboard of rkrebs@fantasy.dsd.es.com (Randall Krebs):
:While attempting to construct a white-space line folder (like "fold"
:except breaks occur on white space), I turned up the following
:unexpected behavior:
:
:	format STDOUT =
:	~~^<<<<<<<<<<<<
:	$cmd
:	.
:	$cmd = "fee -fi -fo -fug -i -smell -the -blood -of -a -perl-bug";
:	write;
:
:produces:
:
:	  fee -fi -fo -
:	  fug -i -smell
:	  the -blood -
:	  of -a -perl-
:	  bug
:
:My objection is in the treatment of dashes which are preceded by
:white space.  Especially, the one preceding "the" in the command.

That's because $: is set to "\n -" by default.  Set it to "\n " if
you don't want to count the dash.

--tom
--
Tom Christiansen		tchrist@convex.com	convex!tchrist
		"So much mail, so little time."