Re: Console Output Formatting Help Required

Stuck my foot in it... should have read the doc myself... guess that is used primarily to write to a file handle. (Tis what I get for being at this hour) Sorry for the chaff...

...figure I might take a gander at Format.

Been a long time since I used it, but seem to recall being able to tune things nicely using it...

But it has been a long time... :-)

...the majority is always wrong, and always the last to know about it...
..by my will, and by will alone.. I set my mind in motion

Comment on Re: Console Output Formatting Help Required

Replies are listed 'Best First'.
Re^2: Console Output Formatting Help Required by hippo (Archbishop) on Sep 27, 2013 at 13:22 UTC
I see no reason not to use format for this case. eg: `#!/usr/bin/perl -Tw use strict; use warnings; my @foo = ( "Mapping a drive to build machine 10.211.32.254..\rMapped to V dri +ve", 'Deleting TestHarness_LUA directory..', 'Deleting TestHarness_LUA-distribution.zip file..', 'Copying TestHarness_LUA-distribution.zip from mapped V drive..' ); for (@foo) { my $status = "done."; format STDOUT = ^<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< ^<<<<< $_, $status . write while $_; }` [download]	[reply] [d/l]
Re^2: Console Output Formatting Help Required by wjw (Priest) on Sep 27, 2013 at 19:28 UTC
Stuck my other foot in it... I was wrong about being wrong. Thanks for pointing that out! Perhaps I should stick with my first instincts... and try them before posting. Lesson learned. And thank for the code. If I had done that to begin with I would be tasting two less samples of shoe leather. Have a great day! ...the majority is always wrong, and always the last to know about it... ..by my will, and by will alone.. I set my mind in motion	[reply]