Help for this page
sub scroll { map { $_, "\n" } split('', shift) }
sub scroll { map { "$_\n" } split('', shift) }