Ok well that might be what you are looking for, but also check out format, link below:
http://www-cgi.cs.cmu.edu/Web/People/rgs/pl-format.html or perldoc perlform It should be an easy matter to format your output to however many columns you want. Chris Hood Chris Hood Investigator Verizon Global Security Operations Center Email: [EMAIL PROTECTED] Desk: 972.399.5900 Verizon Proprietary NOTICE - This message and any attached files may contain information that is confidential and/or subject of legal privilege intended only for the use by the intended recipient. If you are not the intended recipient or the person responsible for delivering the message to the intended recipient, be advised that you have received this message in error and that any dissemination, copying or use of this message or attachment is strictly forbidden, as is the disclosure of the information therein. If you have received this message in error please notify the sender immediately and delete the message. -----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Sent: Thursday, July 01, 2004 7:48 AM To: [EMAIL PROTECTED] Subject: printing 10 scalers/elements All, I am trying to figure out how to print 8 scalers/elements then \n, then 5 more lines of 8 or less for a max total of 40 Here is my code: print FILEOUT "eject 0,0,0 "; my $count = `wc -l <$ejectapes`; if ($count <= 40 ) { while(<FILE>) { chomp $_; print FILEOUT "$_ "; # if 1..8 #print substr($a,0,7); } close (FILEOUT); } The substr is sort of what I want, but is sprintf possible ...what should I use? Here is what my end results will look like if I had a file with 40 E strings: Exxxx Exxxx Exxxx Exxxx Exxxx Exxxx Exxxx Exxxx \n x5 \n anything less but it cannot exceed 8 per line: Exxxx Exxxx Exxxx Exxxx Exxxx Exxxx Exxxx Exxxx \n Exxxx ..... \n thank you, Derek B. Smith -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
