Hi dear brothers,

finally I had a task for the format/write functionality in Perl. While toying around with Perl 5.26.2, I could not find a way however to feed multiple field values into a repeated format line without getting warnings. Probably I am doing something wrong, but what?

Thanks for any insights! 

use strict;
use warnings;
use open ':locale';

sub print_data
{
my ($name, @f);

format START =
.===================.
|@<<<<<<|           |
$name
|       |           |
.=======.===========.
|@<<<<<<|  @<</@>>  |~~
splice( @f, 0, 3 )
.=======.===========.
.

  binmode STDOUT, ':raw:crlf';
  my $ofh = select(STDOUT);
  $~ = "START";
  $name = 'TAB';
  @f = ('Step2', 0, 4, 'Step3', 4,   4);
  write;
}

print_data;

[download]
gives 
perl -w .\TryFormat.pl
Not enough format arguments at .\TryFormat.pl line 16.
Not enough format arguments at .\TryFormat.pl line 16.
Not enough format arguments at .\TryFormat.pl line 16.
.===================.
|TAB    |           |
|       |           |
.=======.===========.
|Step2  |  0  /  4  |
|Step3  |  4  /  4  |
.=======.===========.

[download]

In reply to Avoid warnings while formatting with repeated format lines by hexcoder

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.