@_=split/,/,"consectetur,uspendisse , sagittis , gravida ";$_="Lorem ipsum dolor sit amet,$_[0] adipiscing elitPhasellus interdum justo et elit tempor,a ullamcorper eros $_[0]Proin posuere posuere tinciduntNam $_[0] augue enim,non porta est placerat utS$_[1]sed pretium diamVestibulum dignissim vehicula lacus at viverraProin laoreet nibh est,sit amet malesuada nisl feugiat velDuis tempor pellentesque ligula,sit amet tincidunt nibh commodo egetMauris aliquet arcu at$_[3]rhoncusS$_[1]varius,lorem molestie euismod volutpat,erat turpis faucibus purus,non tempus neque sapien nec quamCurabitur risus tellus,placerat bibendum$_[3]a,dictum vitae risusMaecenas dapibus,tortor in eleifend vulputate,est massa mollis sapien,nec$_[3]urna urna non maurisMorbi tempus varius neque,et facilisis magna$_[2]egetCurabitur a nunc quis orci condimentum luctus eget at elitQuisque venenatis$_[2]tincidunt.";s/,/, /g;s/\B[A-Z]/. $&/g;print
Note that non-ascii characters in the above source code will be escaped (such as \x9f).