STRING::Trim - Perl module to trim whitespace of the ends of a string use STRING::Trim; my $Trimmer = new STRING::Trim; my $String = " This is a string "; my $LeftTrimmedString = $Trimmer->LTrim($String); my $RightTrimmedString = $Trimmer->RTrim($String); my $TrimmedString = $Trimmer->Trim($String); print "The origional string is '$String'\n"; print "The Left Trimmed string is '$LeftTRimmedString'\n"; print "The Right Trimmed string is '$RightTrimmedString'\n"; print "The trimmed string is '$TrimmedString'\n";

Functions
Returns the origional string with the leading spaces deleted. It needs to be called with a string variable Returns the origional String with the trailing spaces deleted. It needs to be called with a string as an argument Returns The origional string with both the leading and trailing spaces deleted. It needs to be called with a string argument This Module has functions to trim the whitespace off of the front, back, or both ends of a string Ricki Stern ricki.stern@med.nyu.edu perl(1).