Help for this page

Select Code to Download


  1. or download this
    print map { "$prefix$_" } split /\n/, join '', @_
  2. or download this
    print map { "$prefix$_" }  join('',@_) =~ m/([^\n]+\n?)/g