On Tue, Apr 05, 2011 at 04:25:12PM -0500, Matt wrote: > I am looking for a perl function or easy way to shorten a long string > if its over X characters. > > Say I have: > > "Doe, John; 56943 Walnut Drive; SomeCity, NY" > > It messes up the display of my html form. So I would like it changed to: > > "Doe, John; ..... meCity, NY" > > Keep first 10 and last 10 characters and abbreviate all else.
The function you are looking for is substr. $ perldoc -f substr You probably want something like: substr $x, 10, -10, " ... " if length $x > 25; -- Paul Johnson - p...@pjcj.net http://www.pjcj.net -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands, e-mail: beginners-h...@perl.org http://learn.perl.org/