Help for this page

Select Code to Download


  1. or download this
    formline( "@<< @<< @<<", '1', '2', '2' );
print "$^A\n";
  2. or download this
    format =
.
formline( "@<< @<< @<<", '1', '2', '2' );
write;
  3. or download this
    format =
@<< @<< @<<
1,  2,  2
.
write;
  4. or download this
    say join ' ', map sprintf('%-3d', $_), 1, 2, 2;