TheDamians Text::Autoformat is also interesting :)
$ perl -MText::Autoformat -e " autoformat( {qw/ right 30 all 1 /})" - very long string right here ya know ^Z very long string right here ya know $ perl -MText::Autoformat -e " autoformat( {qw/ right 28 all 1 /})" - very long string right here ya know ^Z very long string right here ya know $ perl -MText::Autoformat -e " autoformat( {qw/ left 2 right 30 all 1 + /})" - very long string right here ya know ^Z very long string right here ya know $ perl -MText::Autoformat -e " autoformat( {qw/ left 2 right 30 all 1 + /})" - Address_Line_1 (this is never blank) Address_Line_2 (this could be blank) Address_Line_3 (this could be blank) Address_Line_4 (this is never blank) ^Z Address_Line_1 (this is never blank) Address_Line_2 (this could be blank) Address_Line_3 (this could be blank) Address_Line_4 (this is never blank)
As is Perl6::Form
$ perl -MPerl6::Form -ne " print form q{{[[[{ 30 }[[[[}} , $_" - very long string right here ya know very long string right here ya know ^Z
In reply to Re^2: Dividing up Long Lines
by Anonymous Monk
in thread Dividing up Long Lines
by moe79
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |