Select Code to Download

$ perl -MText::Autoformat -e  " autoformat( {qw/ right 30 all 1 /})" -
very long string right here ya know
^Z
...
 blank) Address_Line_4 (this
 is never blank)

$ perl -MPerl6::Form -ne " print form q{{[[[{ 30 }[[[[}} , $_" -
very long string right here ya know
very long string right here ya
know
^Z