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"; |