7 lines
163 B
Perl
7 lines
163 B
Perl
|
$str = formline <<'EOD', right, center, left;
|
||
|
|
Here's some text justification...
|
||
|
|
----------------------------
|
||
|
|
@<<<<<<<<@|||||||@>>>>>>>>>>
|
||
|
|
EOD
|
||
|
|
|
||
|
|
print "$^A\n";
|